From 40110693ecd6dcbdc47bd54e438c3431bb7592f1 Mon Sep 17 00:00:00 2001
From: unethical <une@thi.cal>
Date: Sun, 5 May 2019 01:39:06 +0000
Subject: Update 'tool/irssi_cf_alturl.pl'

---
 tool/irssi_cf_alturl.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tool')

diff --git a/tool/irssi_cf_alturl.pl b/tool/irssi_cf_alturl.pl
index 6952711d..d6d4abac 100644
--- a/tool/irssi_cf_alturl.pl
+++ b/tool/irssi_cf_alturl.pl
@@ -102,7 +102,7 @@ sub GotUrl {
     $data =~ s/^\s+//;
     $data =~ s/\s+$//;
     my @urls = ();
-    my ( $url, $a, $return, $char, $ch, $result ) = "";
+    my ( $url, $a, $return, $char, $ch ) = "";
     my $same    = 0;
     my $sitewas = "t";
     my @chars   = ();
@@ -185,7 +185,7 @@ sub GotUrl {
             if ( $cfg_useshort == 1 ) {
                 if ( length($myurl) > $cfg_minurllen ) {
                     deb("$target Creating Short URL for $myurl");
-                    $url = 'https://ux.nu/api/short?format=plain&url='.$result;
+                    $url = 'https://ux.nu/api/short?format=plain&url='.$myurl;
                     $browser = LWP::UserAgent->new;
                     $browser->agent("cloudflare-tor (Thank you for this service)");
                     $response = $browser->get($url);
-- 
cgit v1.2.3