ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/maps/perl/chat.ext
(Generate patch)

Comparing deliantra/maps/perl/chat.ext (file contents):
Revision 1.12 by root, Sun May 7 11:23:43 2006 UTC vs.
Revision 1.13 by pippijn, Sun May 7 19:51:50 2006 UTC

36 if ($msg) { 36 if ($msg) {
37 my $name = $who->name; 37 my $name = $who->name;
38 my $NOW = time; 38 my $NOW = time;
39 39
40 $_->ob->message ("$name chats: $msg", cf::NDI_BLUE) 40 $_->ob->message ("$name chats: $msg", cf::NDI_BLUE)
41 for grep $_->ob->{ext_ignore_shout}{$name} < $NOW, cf::player::list; 41 for grep { $_->ob->{ext_ignore_shout}{$name} and $_->listening >= 10 } < $NOW, cf::player::list;
42 42
43 } else { 43 } else {
44 $who->message ("Chat what?", cf::NDI_UNIQUE); 44 $who->message ("Chat what?", cf::NDI_UNIQUE);
45 } 45 }
46}; 46};
51 if ($msg) { 51 if ($msg) {
52 my $NOW = time; 52 my $NOW = time;
53 my $name = $who->name; 53 my $name = $who->name;
54 54
55 $_->ob->message ("$name shouts: $msg", cf::NDI_RED) 55 $_->ob->message ("$name shouts: $msg", cf::NDI_RED)
56 for grep $_->ob->{ext_ignore_shout}{$name} < $NOW, cf::player::list; 56 for grep { $_->ob->{ext_ignore_shout}{$name} < $NOW and $_->listening >= 2 }, cf::player::list;
57 57
58 } else { 58 } else {
59 $who->message ("Shout what?", cf::NDI_UNIQUE); 59 $who->message ("Shout what?", cf::NDI_UNIQUE);
60 } 60 }
61 61

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines