Changeset ba2ca66 for perl/modules/IRC/lib/BarnOwl/Module/IRC.pm
- Timestamp:
- Jan 16, 2008, 10:03:00 PM (17 years ago)
- Branches:
- master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
- Children:
- eebef19
- Parents:
- f2d72128
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/IRC/lib/BarnOwl/Module/IRC.pm
r56e72d5 rba2ca66 65 65 sub shutdown { 66 66 for my $conn (values %ircnets) { 67 $conn-> disconnect();67 $conn->conn->disconnect(); 68 68 } 69 69 } … … 169 169 my $cmd = shift; 170 170 my $conn = get_connection(\@_); 171 $conn-> disconnect;171 $conn->conn->disconnect; 172 172 delete $ircnets{$conn->alias}; 173 173 } … … 191 191 # Strip whitespace. In the future -- send one message/line? 192 192 $body =~ tr/\n\r/ /; 193 $conn-> privmsg($to, $body);193 $conn->conn->privmsg($to, $body); 194 194 my $msg = BarnOwl::Message->new( 195 195 type => 'IRC', … … 214 214 $channels{$chan} ||= []; 215 215 push @{$channels{$chan}}, $conn; 216 $conn-> join($chan);216 $conn->conn->join($chan); 217 217 } 218 218 … … 222 222 my $chan = get_channel(\@_) || die("Usage: $cmd <channel>\n"); 223 223 $channels{$chan} = [grep {$_ ne $conn} @{$channels{$chan} || []}]; 224 $conn-> part($chan);224 $conn->conn->part($chan); 225 225 } 226 226 … … 229 229 my $conn = get_connection(\@_); 230 230 my $nick = shift or die("Usage: $cmd <new nick>\n"); 231 $conn-> nick($nick);231 $conn->conn->nick($nick); 232 232 } 233 233 … … 236 236 my $conn = get_connection(\@_); 237 237 my $chan = get_channel(\@_) || die("Usage: $cmd <channel>\n"); 238 $conn-> names($chan);238 $conn->conn->names($chan); 239 239 } 240 240 … … 243 243 my $conn = get_connection(\@_); 244 244 my $who = shift || die("Usage: $cmd <user>\n"); 245 $conn-> whois($who);245 $conn->conn->whois($who); 246 246 } 247 247 … … 249 249 my $cmd = shift; 250 250 my $conn = get_connection(\@_); 251 $conn-> motd;251 $conn->conn->motd; 252 252 } 253 253
Note: See TracChangeset
for help on using the changeset viewer.