Mercurial > eagle-eye

comparison scan.pl @ 89:86402d28544f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
stop upgrade townHall after the level is 20.
author "Rex Tsai <chihchun@kalug.linux.org.tw>"
date Sun, 26 Oct 2008 16:20:48 +0800
parents 0fa9cd836e1e
children 34749e907405
comparison
equal deleted inserted replaced
88:0fa9cd836e1e 89:86402d28544f
84 my $island = $ARGV[0]; 84 my $island = $ARGV[0];
85 85
86 my @cities = $i->viewIsland($island); 86 my @cities = $i->viewIsland($island);
87 saveCities($island, @cities); 87 saveCities($island, @cities);
88 $i->logout; 88 $i->logout;
89 return; 89 exit;
90 } elsif($#ARGV == -1) { 90 } elsif($#ARGV == -1) {
91 $i->login; 91 $i->login;
92 @islands = $i->viewHomeMap(); 92 @islands = $i->viewHomeMap();
93 } else { 93 } else {
94 die("Usage: $0\nUsage: $0 x y\n"); 94 die("Usage: $0\nUsage: $0 x y\n");