@@ -106,7 +106,7 @@ reply whois end = {prefix-user} $0 error nosuchnick = {prefix-server} %_$T%_ No such nick/channel error nickinuse = {prefix-server} Nickname $0 is already in use, type /nick newnick to use another. -irc close = {prefix-error} Disconnected from IRC (type /reconnect to connect again) +irc close = {prefix-error} Disconnected from IRC (click to reconnect) bg = 00 fg = 01 formats/dark @@ -107,7 +107,7 @@ reply whois end = {prefix-user} $0 error nosuchnick = {prefix-server} {hilight $T}: No such nick/channel error nickinuse = {prefix-server} Nickname $0 is already in use, type /nick newnick to use another. -irc close = {prefix-error} Disconnected from IRC (type /reconnect to connect again) +irc close = {prefix-error} Disconnected from IRC (click to reconnect) bg = 00 formats/default @@ -109,7 +109,7 @@ reply whois server = {prefix-user} Server: $0 error nosuchnick = {prefix-server} {hilight $T} Geen nick/kanaal gevonden error nickinuse = {prefix-server} Nickname $0 is al in gebruik, tik /nick nicknaam om een ander te gebruiken. -irc close = {prefix-error} Verbinding met de chatserver werd verbroken ! +irc close = {prefix-error} Verbinding met de chatserver werd verbroken ! (reconnect) bg = 00 formats/dutch @@ -108,7 +108,7 @@ reply whois server = {prefix-user} Server: $0 error nosuchnick = {prefix-server} {hilight $T} Kein Nick/Kanaal gefunden error nickinuse = {prefix-server} Nickname $0 wirdt bereits benutzt, gebrauche /nick neuername um einen anderen zu probieren. -irc close = {prefix-error} Verbindung mit dem chatserver wurde unterbrochen ! +irc close = {prefix-error} Verbindung mit dem chatserver wurde unterbrochen ! (reconnect) bg = 00 fg = 01 formats/german @@ -106,7 +106,7 @@ reply whois end = {prefix-user} $0 error nosuchnick = {prefix-server} %_$0%_ No such nick/channel error nickinuse = {prefix-server} Nickname $0 is already in use, type /nick newnick to use another. -irc close = {prefix-error} Disconnected from IRC (type /reconnect to connect again) +irc close = {prefix-error} Disconnected from IRC (click to reconnect) bg = 01 fg = 00 formats/gothic @@ -109,7 +109,7 @@ reply whois end = {prefix-user} $0 error nosuchnick = {prefix-server} {hilight $T} No such nick/channel error nickinuse = {prefix-server} Nickname $0 is already in use, type /nick newnick to use another. -irc close = {prefix-error} Disconnected from IRC (type /reconnect to connect again) +irc close = {prefix-error} Disconnected from IRC (click to reconnect) bg = 00 formats/mirc @@ -106,7 +106,7 @@ reply whois end = {prefix-user} $0 error nosuchnick = {prefix-server} {hilight $T}: Nu exista canalul/nick-ul error nickinuse = {prefix-server} Nickname-ul $0 este ocupat, tasteaza /nick 'noul-tau_nick' pentru a folosi altul. -irc close = {prefix-error} Deconectat de la IRC. +irc close = {prefix-error} Deconectat de la IRC. (reconnect) bg = 00 formats/romanian @@ -105,7 +105,7 @@ reply whois end = {prefix-user} $0 error nosuchnick = {prefix-server} %_$0%_ Нет такого ника/канала error nickinuse = {prefix-server} Ник $0 уже используется, наберите /nick новый_ник для смены ника. -irc close = {prefix-error} Потеря связи с IRC +irc close = {prefix-error} Потеря связи с IRC (reconnect) bg = 00 fg = 01 formats/russian @@ -194,4 +194,9 @@ print <<EOF; EOF } +sub reconnect { + my($self, $url, $text) = @_; + return "<a href=\"$url\" target=\"_top\">$text</a>"; +} + 1; interfaces/default.pm @@ -411,6 +411,11 @@ sub say { return 'ok'; } +sub reconnect { + my($self, $url, $text) = @_; + return "<a href=\"$url\" target=\"_top\" onclick='if(parent.fwindowlist.reconnect){parent.fwindowlist.reconnect();return false;}'>$text</a>"; +} + sub fwindowlist { my($self, $cgi, $config) = @_; my $string; interfaces/ie.pm @@ -418,6 +418,11 @@ sub say { return 'ok'; } +sub reconnect { + my($self, $url, $text) = @_; + return "<a href=\"$url\" target=\"_top\" onclick='if(parent.fwindowlist.reconnect){parent.fwindowlist.reconnect();return false;}'>$text</a>"; +} + .$sub fwindowlist .$sub fmain .$sub fuserlist interfaces/interface-make/main.pm @@ -412,6 +412,11 @@ sub say { return 'ok'; } +sub reconnect { + my($self, $url, $text) = @_; + return "<a href=\"$url\" target=\"_top\" onclick='if(parent.fwindowlist.reconnect){parent.fwindowlist.reconnect();return false;}'>$text</a>"; +} + sub fwindowlist { my($self, $cgi, $config) = @_; my $string; interfaces/konqueror.pm @@ -412,6 +412,11 @@ sub say { return 'ok'; } +sub reconnect { + my($self, $url, $text) = @_; + return "<a href=\"$url\" target=\"_top\" onclick='if(parent.fwindowlist.reconnect){parent.fwindowlist.reconnect();return false;}'>$text</a>"; +} + sub fwindowlist { my($self, $cgi, $config) = @_; my $string; interfaces/mozilla.pm @@ -412,6 +412,11 @@ sub say { return 'ok'; } +sub reconnect { + my($self, $url, $text) = @_; + return "<a href=\"$url\" target=\"_top\" onclick='if(parent.fwindowlist.reconnect){parent.fwindowlist.reconnect();return false;}'>$text</a>"; +} + sub fwindowlist { my($self, $cgi, $config) = @_; my $string; interfaces/opera7.pm @@ -32,7 +32,7 @@ use vars qw( ); ($VERSION = -'$Name: $ 0_5_CVS $Id: nph-irc.cgi,v 1.117 2006/04/30 18:03:50 dgl Exp $' +'$Name: $ 0_5_CVS $Id: nph-irc.cgi,v 1.118 2006/04/30 19:08:55 dgl Exp $' ) =~ s/^.*?(\d\S+) .*?(\d{4}\/\S+) .*$/$1/; $VERSION .= " ($2)"; $VERSION =~ s/_/./g; @@ -902,7 +902,12 @@ sub irc_close { exit unless ref $ircfh; net_send($ircfh, "QUIT :$message\r\n"); - format_out('irc close', { target => '-all', activity => 1 }); + + my $info = { target => '-all', activity => 1 }; + my $close = format_colourhtml(format_parse($format->{'irc close'}, $info)); + my $url = defined $config->{form_redirect} ? $config->{form_redirect} : $config->{script_login}; + $close =~ s/\((.*?)\)/"(" . $interface->reconnect($url, $1) . ")"/e; + interface_lineout($info, $close); flushoutput(); nph-irc.cgi 60f6c8deea986531c92032795d3c6a35830c85ea dgl dgl http://github.com/dgl/cgiirc/commit/6b5428b9387e98ae9988044b35fc194ea193cc05 6b5428b9387e98ae9988044b35fc194ea193cc05 2006-04-30T12:08:55-07:00 2006-04-30T12:08:55-07:00 Click to reconnect thing 57d743269e86dd0f35a701d7e2e0aa7f47f2d52f dgl dgl