Mercurial > laserkard

comparison buy.pl @ 29:7742910e0479 laserkard

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r30] implemented drawing text on the picture dynamically. still need to center stuff
author rlm
date Sat, 16 Jan 2010 12:25:43 -0500
parents 5b5c03a850b9
children 0deeb2d5d1db
comparison
equal deleted inserted replaced
28:5b5c03a850b9 29:7742910e0479
154 $all = shift; 154 $all = shift;
155 155
156 156
157 157
158 $t = <<HERE; 158 $t = <<HERE;
159 <input TYPE="image" src = "./images/display/PERL::PIC.jpg" onmouseover="pokedex(['args__PERL::PIC'],['pokedex']);"> 159 <image src = "./images/display/PERL::PIC.jpg" onmouseover="pokedex(['args__PERL::PIC'],['pokedex']);">
160 HERE 160
161 <div id = overlay>
162
163
164 </div>
165
166 HERE
167
161 168
162 169
163 $t =~ s/PERL::PIC/$all/g; 170 $t =~ s/PERL::PIC/$all/g;
164 171
165 172
166 173
167 return $t; 174 return $t;
168 175
169 } 176 }
170 177