Change user-agent string

1 files changed, 6 insertions, 1 deletions

diff --git a/pyxis.pl b/pyxis.pl
index c45f3e6..07fdffd 100755
--- a/pyxis.pl
+++ b/pyxis.pl
@@ -46,7 +46,12 @@ my %feeds = get_feeds();
 my %dispatch = (
     fetch => sub {
         require HTTP::Tiny;
-        my $http = HTTP::Tiny->new(verify_SSL => 1);
+        my $http = HTTP::Tiny
+            ->new(
+                verify_SSL => 1,
+                # default user-agent string if ending in space.
+                agent => "pyxis: https://andinus.nand.sh/pyxis ",
+            );
 
         foreach my $feed (sort keys %feeds) {
             my $url = $feeds{$feed};