Update 'tool/irssi_cf_alturl.pl'
This commit is contained in:
parent
8de9515bbe
commit
52b784ba71
|
@ -195,7 +195,11 @@ sub GotUrl {
|
||||||
$response = $browser->get($url);
|
$response = $browser->get($url);
|
||||||
$answer = $response->content;
|
$answer = $response->content;
|
||||||
if ( index( $answer, 'https://ux.nu/' ) == 0 ) {
|
if ( index( $answer, 'https://ux.nu/' ) == 0 ) {
|
||||||
|
if ($mytype eq ''){
|
||||||
$mytype = '^B^C7[Short]^O ';
|
$mytype = '^B^C7[Short]^O ';
|
||||||
|
}else{
|
||||||
|
$mytype = '^B^C2[Short,Archive]^O ';
|
||||||
|
}
|
||||||
$myurl = $answer;
|
$myurl = $answer;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue