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

Comparing deliantra/server/ext/commands.ext (file contents):
Revision 1.84 by root, Sun Jan 29 02:47:04 2017 UTC vs.
Revision 1.85 by root, Wed Jun 26 06:52:41 2019 UTC

… …
405); 405);
406 406
407cf::register_command maps => sub { 407cf::register_command maps => sub {
408 my ($ob, $arg) = @_; 408 my ($ob, $arg) = @_;
409 409
410 no re 'eval'; $arg = qr<$arg>; 410 $arg = eval {
411 no re 'eval';
412 local $SIG{__DIE__};
413 qr<$arg>
414 };
411 415
412 my $format = " %2s %1s %3s %5s %.60s\n"; 416 my $format = " %2s %1s %3s %5s %.60s\n";
413 417
414 my $msg = "\n" . sprintf $format, "Pl", "S", "Svd", "Reset", "Name"; 418 my $msg = "\n" . sprintf $format, "Pl", "S", "Svd", "Reset", "Name";
415 419

Diff Legend

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