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

Comparing deliantra/server/ext/dm-support.ext (file contents):
Revision 1.27 by root, Mon Apr 12 17:13:36 2010 UTC vs.
Revision 1.30 by root, Tue May 4 21:45:42 2010 UTC

20You can freely use \$a .. \$z and \@l and \%l 20You can freely use \$a .. \$z and \@l and \%l
21 21
22Useful commands (note the '&'): 22Useful commands (note the '&'):
23 23
24reload_perl & 24reload_perl &
25reload_sound &
25reload_config & 26reload_config &
26reload_regions & 27reload_regions &
27reload_facedata & 28reload_facedata &
28reload_treasures & 29reload_treasures &
29reload_archetypes & 30reload_archetypes &
31reload_resources &
30ext::help::reload & 32ext::help::reload &
31ext::books::reload & 33ext::books::reload &
32ext::map_tags::reload & 34ext::map_tags::reload &
33ext::map_world::reload & 35ext::map_world::reload &
34# ext::map_scheduler::loadall & # debugging only! 36# ext::map_scheduler::loadall & # debugging only!
61 my $t2 = Time::HiRes::time; 63 my $t2 = Time::HiRes::time;
62 64
63 print "\n", 65 print "\n",
64 "command: '$cmd'\n", 66 "command: '$cmd'\n",
65 "execution time: ", $t2 - $t1, "\n"; 67 "execution time: ", $t2 - $t1, "\n";
66 warn "evaluation error: $@" if $@;
67 print "evaluation error: $@\n" if $@; 68 print "evaluation error: $@\n" if $@;
68 print "result:\n", cf::dumpval @res > 1 ? \@res : $res[0] if @res; 69 print "result:\n", cf::dumpval @res > 1 ? \@res : $res[0] if @res;
69 print "\n> "; 70 print "\n> ";
70 71
71 select STDOUT; 72 select STDOUT;
95 if (my $listen = new IO::Socket::INET LocalAddr => $cf::CFG{perl_shell}, Listen => 1, ReuseAddr => 1, Blocking => 0) { 96 if (my $listen = new IO::Socket::INET LocalAddr => $cf::CFG{perl_shell}, Listen => 1, ReuseAddr => 1, Blocking => 0) {
96 $LISTENER = AE::io $listen, 0, sub { tcp_serve $listen->accept }; 97 $LISTENER = AE::io $listen, 0, sub { tcp_serve $listen->accept };
97 } 98 }
98} 99}
99 100
100

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines