Mercurial > laserkard
diff buy.pl @ 5:116b15d3d68c laserkard
[svn r6]
author | rlm |
---|---|
date | Fri, 01 Jan 2010 17:44:10 -0500 |
parents | c96cb4e773e5 |
children | 839533015ed3 |
line wrap: on
line diff
1.1 --- a/buy.pl Fri Jan 01 01:19:49 2010 -0500 1.2 +++ b/buy.pl Fri Jan 01 17:44:10 2010 -0500 1.3 @@ -87,12 +87,12 @@ 1.4 $materialcolor = $1; 1.5 1.6 1.7 -$r = "Templates:<br> 1.8 +$r = "<div id = \"i_templates\">Templates:<br> 1.9 <input TYPE=\"image\" src = \"./templates/thumbnails/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\" > 1.10 <input TYPE=\"image\" src = \"./templates/thumbnails/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\" > 1.11 <input TYPE=\"image\" src = \"./templates/thumbnails/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\" > 1.12 <input TYPE=\"image\" src = \"./templates/thumbnails/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\" > 1.13 - 1.14 + </div> 1.15 1.16 "; 1.17 1.18 @@ -180,8 +180,8 @@ 1.19 $a =~ s/PERL-REPLACE::MATERIALS/$b/; #let's do it again!!! :) 1.20 $b = &template("classic_acrylic_clear"); 1.21 1.22 -#$a =~ s/PERL-REPLACE::TEMPLATES//; 1.23 -$a =~ s/PERL-REPLACE::TEMPLATES/$b/; #comment out one or the other! 1.24 +$a =~ s/PERL-REPLACE::TEMPLATES//; 1.25 +#$a =~ s/PERL-REPLACE::TEMPLATES/$b/; #comment out one or the other! 1.26 1.27 1.28