From 40110693ecd6dcbdc47bd54e438c3431bb7592f1 Mon Sep 17 00:00:00 2001 From: unethical Date: Sun, 5 May 2019 01:39:06 +0000 Subject: [PATCH] Update 'tool/irssi_cf_alturl.pl' --- tool/irssi_cf_alturl.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tool/irssi_cf_alturl.pl b/tool/irssi_cf_alturl.pl index 6952711d0..d6d4abac4 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);