Mercurial > laserkard
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 { |