ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/kgsueme/kgsueme/app.pl
(Generate patch)

Comparing kgsueme/kgsueme/app.pl (file contents):
Revision 1.16 by root, Mon May 31 01:07:48 2004 UTC vs.
Revision 1.17 by root, Mon May 31 02:04:40 2004 UTC

… …
148 my ($self, $msg) = @_; 148 my ($self, $msg) = @_;
149 149
150 if ((lc $msg->{name2}) eq (lc $self->{name})) { 150 if ((lc $msg->{name2}) eq (lc $self->{name})) {
151 unless ($self->{user}{lc $msg->{name}}) { 151 unless ($self->{user}{lc $msg->{name}}) {
152 $self->open_user (name => $msg->{name})->inject ($msg); 152 $self->open_user (name => $msg->{name})->inject ($msg);
153 sound::play 2, "ring";
153 } 154 }
154 } 155 }
155} 156}
156 157
157sub inject_chal_defaults { 158sub inject_chal_defaults {

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines