Mercurial > laserkard
diff buy.pl @ 22:3298256dd459 laserkard
[svn r23] did much cosmetic work.
author | rlm |
---|---|
date | Sun, 03 Jan 2010 03:36:21 -0500 |
parents | 896afe03bc67 |
children | 707d202f58b1 |
line wrap: on
line diff
1.1 --- a/buy.pl Sun Jan 03 00:55:18 2010 -0500 1.2 +++ b/buy.pl Sun Jan 03 03:36:21 2010 -0500 1.3 @@ -88,10 +88,14 @@ 1.4 1.5 1.6 $r = "<div id = \"i_templates\">Templates:<br> 1.7 - <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> 1.8 - <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> 1.9 - <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> 1.10 - <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\" > 1.11 + 1.12 +<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> 1.13 + 1.14 +<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> 1.15 + 1.16 +<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> 1.17 + 1.18 +<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\" > 1.19 </div> 1.20 1.21 "; 1.22 @@ -178,11 +182,16 @@ 1.23 $a =~ s/PERL-REPLACE::TOP_MENU/$b/; #equivalent to <?php include("top_menu.html"); ?>, but in perl and with more memory problems :) 1.24 $b = &material("void_acrylic_clear",1); 1.25 $a =~ s/PERL-REPLACE::MATERIALS/$b/; #let's do it again!!! :) 1.26 -$b = &template("classic_acrylic_clear"); 1.27 +$b = &template("big_acrylic_clear"); 1.28 1.29 #$a =~ s/PERL-REPLACE::TEMPLATES//; 1.30 $a =~ s/PERL-REPLACE::TEMPLATES/$b/; #comment out one or the other! 1.31 1.32 +$b = &display("big_acrylic_clear"); 1.33 +$a =~ s/PERL-REPLACE::DISPLAY/$b/; 1.34 + 1.35 +$b = &inputbox("big_acrylic_clear"); 1.36 +$a =~ s/PERL-REPLACE::INPUTBOX/$b/; 1.37 1.38 1.39 return $a