Update 'tool/irssi_cf_alturl.pl'

This commit is contained in:
unethical 2019-05-05 08:40:18 +00:00
parent 8de9515bbe
commit 52b784ba71
1 changed files with 5 additions and 1 deletions

View File

@ -195,7 +195,11 @@ sub GotUrl {
$response = $browser->get($url);
$answer = $response->content;
if ( index( $answer, 'https://ux.nu/' ) == 0 ) {
$mytype = '^B^C7[Short]^O ';
if ($mytype eq ''){
$mytype = '^B^C7[Short]^O ';
}else{
$mytype = '^B^C2[Short,Archive]^O ';
}
$myurl = $answer;
}
}