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

Comparing deliantra/maps/perl/commands.ext (file contents):
Revision 1.7 by root, Fri Sep 29 20:33:24 2006 UTC vs.
Revision 1.8 by root, Fri Sep 29 21:59:53 2006 UTC

… …
71} 71}
72 72
73cf::register_command who => $cf::TICK, sub { 73cf::register_command who => $cf::TICK, sub {
74 my ($ob, $arg) = @_; 74 my ($ob, $arg) = @_;
75 75
76 $ob->reply (undef, (join "\n", who_listing $ob->flag (cf::FLAG_WIZ)), cf::NDI_UNIQUE | cf::NDI_GOLD); 76 $ob->reply (undef, (join "\n", who_listing $ob->flag (cf::FLAG_WIZ)), cf::NDI_UNIQUE | cf::NDI_DK_ORANGE);
77}; 77};
78 78
79cf::register_command rename => $cf::TICK, sub { 79cf::register_command rename => $cf::TICK, sub {
80 my ($ob, $arg) = @_; 80 my ($ob, $arg) = @_;
81 81

Diff Legend

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