- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/IRC/lib/BarnOwl/Module/IRC/Connection.pm
r1951db8 r1af21e8 126 126 BarnOwl::Style::boldify('IRC ' . $evt->type . ' message from ' 127 127 . $self->alias) . "\n" 128 . strip_irc_formatting(join '\n', cdr $evt->args));128 . strip_irc_formatting(join '\n', cdr($evt->args))); 129 129 } 130 130 131 131 sub on_motdstart { 132 132 my ($self, $evt) = @_; 133 $self->motd(join "\n", cdr $evt->args);133 $self->motd(join "\n", cdr($evt->args)); 134 134 } 135 135 136 136 sub on_motd { 137 137 my ($self, $evt) = @_; 138 $self->motd(join "\n", $self->motd, cdr $evt->args);138 $self->motd(join "\n", $self->motd, cdr($evt->args)); 139 139 } 140 140 141 141 sub on_endofmotd { 142 142 my ($self, $evt) = @_; 143 $self->motd(join "\n", $self->motd, cdr $evt->args);143 $self->motd(join "\n", $self->motd, cdr($evt->args)); 144 144 if(!$self->connected) { 145 145 BarnOwl::admin_message("IRC", "Connected to " .
Note: See TracChangeset
for help on using the changeset viewer.