diff agent.pl @ 93:73f0a1cafc23

upgrade townHall first, then the wall.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Mon, 27 Oct 2008 11:06:11 +0800
parents 86402d28544f
children 362184763c04
line wrap: on
line diff
--- a/agent.pl	Sun Oct 26 22:56:16 2008 +0800
+++ b/agent.pl	Mon Oct 27 11:06:11 2008 +0800
@@ -282,6 +282,6 @@
 
     my ($func, $param) = split(/_/,$action);
     printf('$i->%s("%s", %s);'. "\n", $func, $param, $cityId);
-    # eval(sprintf('$i->%s("%s", %s);', $func, $param, $cityId));
-    # warn $@ if $@;
+    eval(sprintf('$i->%s("%s", %s);', $func, $param, $cityId));
+    warn $@ if $@;
 }