Updated Perl support

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@134 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2000-03-05 21:21:34 +00:00 committed by cras
parent 7a9cc02252
commit 2915bac386

View File

@ -130,7 +130,7 @@ Server::values()
%server_info = %{Irssi::cur_server->values()}; %server_info = %{Irssi::cur_server->values()};
Irssi::print("Current server = ".$server_info{'address'}); Irssi::print("Current server = ".$server_info{'address'});
Server server_connect(address, [port=6667, [password='', [nick='']]]) Server server_connect(address, [port=6667, [password='', [nick='', [channels='']]]])
Create new server connection. Create new server connection.
Server::disconnect() Server::disconnect()
@ -145,6 +145,10 @@ Server server_find_ircnet(ircnet)
Channel channel_find_any(channel) Channel channel_find_any(channel)
Find `channel' from any server Find `channel' from any server
Channel Server::channel_find_level(level)
Find channel with level `level' preferably from specified server, but
fallbacks to any channel the matching level.
Server::send_raw(cmd) Server::send_raw(cmd)
Send raw message to server, it will be flood protected so you Send raw message to server, it will be flood protected so you
don't need to worry about it. don't need to worry about it.