diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-01 23:16:49 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-01 23:16:49 +0000 |
commit | 2788aecf5ca76c8ff061ed820480657baee34082 (patch) | |
tree | c84e731327c9f3e7ce8ec46e7be28cb7101aca7b /bin/rc.pl | |
parent | d6a3718043c92e934e9dd24edd46e346726c4f28 (diff) |
String fixes... missed a few
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@453 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin/rc.pl')
-rwxr-xr-x | bin/rc.pl | 10 |
1 files changed, 7 insertions, 3 deletions
@@ -191,6 +191,10 @@ sub continue { &{ $form->{nextsub} } }; sub till_closing { $form->{callback} = "$form->{script}?path=$form->{path}&login=$form->{login}&sessionid=$form->{sessionid}"; + # $locale->text("Source"); + # $locale->text("Actual"); + # $locale->text("Expected"); + # $locale->text("Error"); @colheadings = qw(Source Actual Expected Error); my $curren = $pos_config{'curren'}; @@ -217,7 +221,7 @@ sub till_closing { |; print "<tr>"; - map {print "<td class=listheading>$_</td>";} @colheadings; + map {print "<td class=listheading>".$locale->text($_)."</td>";} @colheadings; print "</tr>"; my $j; my $source; @@ -303,12 +307,12 @@ function check_errors(){ print qq|<tr> <td><input type=text name=$calcval value="$form->{$calcval}"></td> <th>X ${curren}${unit} = </th> - <td><input type=text name=$subval value="$form->{$subval}"></td> + <td><input type="text" name="$subval" value="$form->{$subval}"></td> </tr>|; } print qq|<tr> <td> </td> - <th>Subtotal:</th> + <th>|.$locale->text("Subtotal").qq|:</th> <td><input type=text name=sub_sub value="$form->{sub_sub}"></td> </tr> </table> |