Mercurial > eagle-eye

comparison agent.pl @ 93:73f0a1cafc23

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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
comparison
equal deleted inserted replaced
92:bcd2e32cfabb 93:73f0a1cafc23
280 sub triggerAction { 280 sub triggerAction {
281 my ($action, $cityId) = @_; 281 my ($action, $cityId) = @_;
282 282
283 my ($func, $param) = split(/_/,$action); 283 my ($func, $param) = split(/_/,$action);
284 printf('$i->%s("%s", %s);'. "\n", $func, $param, $cityId); 284 printf('$i->%s("%s", %s);'. "\n", $func, $param, $cityId);
285 # eval(sprintf('$i->%s("%s", %s);', $func, $param, $cityId)); 285 eval(sprintf('$i->%s("%s", %s);', $func, $param, $cityId));
286 # warn $@ if $@; 286 warn $@ if $@;
287 } 287 }