SF.net SVN: ledger-smb: [398] trunk/bin/cp.pl

[..hidden..]

Revision: 398
          http://svn.sourceforge.net/ledger-smb/?rev=398&view=rev
Author:   tetragon
Date:     2006-10-30 13:28:30 -0800 (Mon, 30 Oct 2006)

Log Message:
-----------
Update buttons

Modified Paths:
--------------
    trunk/bin/cp.pl

Modified: trunk/bin/cp.pl
===================================================================
--- trunk/bin/cp.pl	2006-10-30 21:23:36 UTC (rev 397)
+++ trunk/bin/cp.pl	2006-10-30 21:28:30 UTC (rev 398)
@@ -480,18 +480,18 @@
 # type=submit $locale->text('Print') 
 # type=submit $locale->text('Select all') 
 
-  %button = ('Update' => { ndx => 1, key => 'U', value => $locale->text('Update') },
-	     'Select all' => { ndx => 2, key => 'A', value => $locale->text('Select all') },
-             'Print' => { ndx => 3, key => 'P', value => $locale->text('Print') },
-	     'Post' => { ndx => 4, key => 'O', value => $locale->text('Post') },
+  %button = ('update' => { ndx => 1, key => 'U', value => $locale->text('Update') },
+	     'select_all' => { ndx => 2, key => 'A', value => $locale->text('Select all') },
+             'print' => { ndx => 3, key => 'P', value => $locale->text('Print') },
+	     'post' => { ndx => 4, key => 'O', value => $locale->text('Post') },
 	    ); 
 
   if (! ${LedgerSMB::Sysconfig::latex}) {
-    delete $button{'Print'};
+    delete $button{'print'};
   }
 
   if ($transdate <= $closedto) {
-    for ('Post', 'Print') { delete $button{$_} }
+    for ('post', 'print') { delete $button{$_} }
     $media = $format = "";
   }
   
@@ -1082,18 +1082,18 @@
 </table>
 |;
 
-  %button = ('Update' => { ndx => 1, key => 'U', value => $locale->text('Update') },
-	     'Select all' => { ndx => 2, key => 'A', value => $locale->text('Select all') },
-             'Print' => { ndx => 3, key => 'P', value => $locale->text('Print') },
-	     'Post' => { ndx => 4, key => 'O', value => $locale->text('Post') },
+  %button = ('update' => { ndx => 1, key => 'U', value => $locale->text('Update') },
+	     'select_all' => { ndx => 2, key => 'A', value => $locale->text('Select all') },
+             'print' => { ndx => 3, key => 'P', value => $locale->text('Print') },
+	     'post' => { ndx => 4, key => 'O', value => $locale->text('Post') },
 	    ); 
 
   if (! ${LedgerSMB::Sysconfig::latex}) {
-    delete $button{'Print'};
+    delete $button{'print'};
   }
 
   if ($transdate <= $closedto) {
-    for ('Post', 'Print') { delete $button{$_} }
+    for ('post', 'print') { delete $button{$_} }
     $media = $format = "";
   }
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.