Mercurial > eagle-eye

comparison agent.pl @ 152:60a09758a885

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added research for Museum
author chihchun@debian.org.tw
date Sat, 01 Nov 2008 04:09:52 +0800
parents 7071116f6ae7
children e8a244ce5a1d
comparison
equal deleted inserted replaced
151:7071116f6ae7 152:60a09758a885
143 } 143 }
144 144
145 sub is_invention_researched { 145 sub is_invention_researched {
146 my ($self) = @_; 146 my ($self) = @_;
147 return (defined($self->{'ikariam'}->{research}->{3040}) ? 1 : 0); 147 return (defined($self->{'ikariam'}->{research}->{3040}) ? 1 : 0);
148 }
149
150 sub is_culturalexchange_researched {
151 my ($self) = @_;
152 return (defined($self->{'ikariam'}->{research}->{3060}) ? 1 : 0);
148 } 153 }
149 154
150 sub is_professionalarmy_researched { 155 sub is_professionalarmy_researched {
151 my ($self) = @_; 156 my ($self) = @_;
152 return (defined($self->{'ikariam'}->{research}->{4030}) ? 1 : 0); 157 return (defined($self->{'ikariam'}->{research}->{4030}) ? 1 : 0);