comparison paypal/generate_paylists.pm @ 26:4475e9ee3c36 laserkard

[svn r27] web presence
author rlm
date Sun, 03 Jan 2010 22:42:45 -0500
parents 2979a76e3fdf
children 7742910e0479
comparison
equal deleted inserted replaced
25:b9a4988a22ed 26:4475e9ee3c36
108 108
109 $start2 = $start; 109 $start2 = $start;
110 110
111 $start =~ s/PERL::COST/@costs_names[0]/; 111 $start =~ s/PERL::COST/@costs_names[0]/;
112 $start =~ s/PERL::CODE/@costs_code[0]/; 112 $start =~ s/PERL::CODE/@costs_code[0]/;
113 $start =~ s/PERL::CHECKED/\"CHECKED\"/; 113 $start =~ s/PERL::CHECKED/CHECKED/;
114 114
115 115
116 116
117 if (2 == $payment_opts) 117 if (2 == $payment_opts)
118 { 118 {