Mercurial > laserkard

comparison buy.pl @ 18:2f537455ebf7 laserkard

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r19] lots o changes
author rlm
date Sun, 03 Jan 2010 00:26:19 -0500
parents 839533015ed3
children 896afe03bc67
comparison
equal deleted inserted replaced
17:1481aa25c3c7 18:2f537455ebf7
86 86
87 $materialcolor = $1; 87 $materialcolor = $1;
88 88
89 89
90 $r = "<div id = \"i_templates\">Templates:<br> 90 $r = "<div id = \"i_templates\">Templates:<br>
91 <input TYPE=\"image\" src = \"./images/templates/classic_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__classic\'],[\'pokedex\']);\" onclick=\"display([\'template1\'], [\'display\']); inputbox([\'template1\'], [\'inputbox\']);material([\'template1\'], [\'materials\']);\" ID=\"template1\" NAME=\"template1\" VALUE=\"classic_$materialcolor\" ><br> 91 <input TYPE=\"image\" src = \"./images/templates/classic_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__classic\'],[\'pokedex\']);\" onclick=\"display([\'template1\'], [\'display\']); inputbox([\'template1\'], [\'inputbox\']);material([\'template1\'], [\'materials\']);\" ID=\"template1\" NAME=\"template1\" VALUE=\"classic_$materialcolor\" >
92 <input TYPE=\"image\" src = \"./images/templates/big_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__big\'],[\'pokedex\']);\" onclick=\"display([\'template2\'], [\'display\']); inputbox([\'template2\'], [\'inputbox\']);material([\'template2\'], [\'materials\']);\" ID=\"template2\" NAME=\"template2\" VALUE=\"big_$materialcolor\" > <br> 92 <input TYPE=\"image\" src = \"./images/templates/big_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__big\'],[\'pokedex\']);\" onclick=\"display([\'template2\'], [\'display\']); inputbox([\'template2\'], [\'inputbox\']);material([\'template2\'], [\'materials\']);\" ID=\"template2\" NAME=\"template2\" VALUE=\"big_$materialcolor\" > <br>
93 <input TYPE=\"image\" src = \"./images/templates/basic_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__basic\'],['pokedex\']);\" onclick=\"display([\'template3\'], [\'display\']); inputbox([\'template3\'], [\'inputbox\']);material([\'template3\'], [\'materials\']);\" ID=\"template3\" NAME=\"template3\" VALUE=\"basic_$materialcolor\" ><br> 93 <input TYPE=\"image\" src = \"./images/templates/basic_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__basic\'],['pokedex\']);\" onclick=\"display([\'template3\'], [\'display\']); inputbox([\'template3\'], [\'inputbox\']);material([\'template3\'], [\'materials\']);\" ID=\"template3\" NAME=\"template3\" VALUE=\"basic_$materialcolor\" >
94 <input TYPE=\"image\" src = \"./images/templates/lines_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__lines\'],[\'pokedex\']);\" onclick=\"display([\'template4\'], [\'display\']); inputbox([\'template4\'], [\'inputbox\']);material([\'template4\'], [\'materials\']);\" ID=\"template4\" NAME=\"template4\" VALUE=\"lines_$materialcolor\" > 94 <input TYPE=\"image\" src = \"./images/templates/lines_$materialcolor.jpg\" onmouseover=\"pokedex([\'args__lines\'],[\'pokedex\']);\" onclick=\"display([\'template4\'], [\'display\']); inputbox([\'template4\'], [\'inputbox\']);material([\'template4\'], [\'materials\']);\" ID=\"template4\" NAME=\"template4\" VALUE=\"lines_$materialcolor\" >
95 </div> 95 </div>
96 96
97 "; 97 ";
98 98
182 182
183 #$a =~ s/PERL-REPLACE::TEMPLATES//; 183 #$a =~ s/PERL-REPLACE::TEMPLATES//;
184 $a =~ s/PERL-REPLACE::TEMPLATES/$b/; #comment out one or the other! 184 $a =~ s/PERL-REPLACE::TEMPLATES/$b/; #comment out one or the other!
185 185
186 186
187 $b = &display("classic_acrylic_clear");
188 $a =~ s/PERL-REPLACE::DISPLAY/$b/; #let's do it again!!! :)
189
190 $b = &inputbox("classic_acrylic_clear");
191 $a =~ s/PERL-REPLACE::INPUTBOX/$b/; #let's do it again!!! :)
187 192
188 return $a 193 return $a
189 194
190 195
191 } 196 }