Mercurial > eagle-eye

comparison agent.pl @ 82:82acbba33b97

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed the build function.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sat, 25 Oct 2008 01:12:20 +0800
parents d57920014cb4
children 2c6c219dc3ff
comparison
equal deleted inserted replaced
81:d57920014cb4 82:82acbba33b97
224 print(Dumper($cities)) if(defined($verbose)); 224 print(Dumper($cities)) if(defined($verbose));
225 } 225 }
226 226
227 $i->logout; 227 $i->logout;
228 228
229
230 sub triggerAction { 229 sub triggerAction {
231 my ($action, $cityId) = @_; 230 my ($action, $cityId) = @_;
232 231
233 my ($func, $param) = split(/_/,$action); 232 my ($func, $param) = split(/_/,$action);
234 printf('$i->%s("%s", %s);'. "\n", $func, $param, $cityId); 233 printf('$i->%s("%s", %s);'. "\n", $func, $param, $cityId);