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.17 by pippijn, Mon May 22 08:13:37 2006 UTC vs.
Revision 1.18 by root, Tue May 30 04:30:54 2006 UTC

2 2
3# implement a replacement for the built-in say/chat/shout/tell/reply commands 3# implement a replacement for the built-in say/chat/shout/tell/reply commands
4# adds ignore/unignore functionality 4# adds ignore/unignore functionality
5 5
6sub valid_user($) { 6sub valid_user($) {
7 cf::player::find $_[0]
7 -f sprintf "%s/%s/%s/%s.pl", cf::localdir, cf::playerdir, ($_[0]) x 2; 8 or -f sprintf "%s/%s/%s/%s.pl", cf::localdir, cf::playerdir, ($_[0]) x 2;
8} 9}
9 10
10sub clean_timeouts($) { 11sub clean_timeouts($) {
11 my ($player) = @_; 12 my ($player) = @_;
12 my $NOW = time; 13 my $NOW = time;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines