[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
SF.net SVN: ledger-smb: [407] trunk/bin/pos.pl
- Subject: SF.net SVN: ledger-smb: [407] trunk/bin/pos.pl
- From: ..hidden..
- Date: Mon, 30 Oct 2006 15:51:49 -0800
Revision: 407
http://svn.sourceforge.net/ledger-smb/?rev=407&view=rev
Author: tetragon
Date: 2006-10-30 15:51:47 -0800 (Mon, 30 Oct 2006)
Log Message:
-----------
Updating buttons
Modified Paths:
--------------
trunk/bin/pos.pl
Modified: trunk/bin/pos.pl
===================================================================
--- trunk/bin/pos.pl 2006-10-30 23:46:50 UTC (rev 406)
+++ trunk/bin/pos.pl 2006-10-30 23:51:47 UTC (rev 407)
@@ -559,22 +559,22 @@
# type=submit $locale->text('Delete')
if (! $form->{readonly}) {
- %button = ('Update' => { ndx => 1, key => 'U', value => $locale->text('Update') },
- 'Print' => { ndx => 2, key => 'P', value => $locale->text('Print') },
- 'Post' => { ndx => 3, key => 'O', value => $locale->text('Post') },
- 'Print and Post' => { ndx => 4, key => 'R', value => $locale->text('Print and Post') },
- 'Delete' => { ndx => 5, key => 'D', value => $locale->text('Delete') },
+ %button = ('update' => { ndx => 1, key => 'U', value => $locale->text('Update') },
+ 'print' => { ndx => 2, key => 'P', value => $locale->text('Print') },
+ 'post' => { ndx => 3, key => 'O', value => $locale->text('Post') },
+ 'print_and_post' => { ndx => 4, key => 'R', value => $locale->text('Print and Post') },
+ 'delete' => { ndx => 5, key => 'D', value => $locale->text('Delete') },
);
if ($transdate > $closedto) {
if (! $form->{id}) {
- delete $button{'Delete'};
+ delete $button{'delete'};
}
- delete $button{'Print and Post'} unless ${LedgerSMB::Sysconfig::latex};
+ delete $button{'print_and_post'} unless ${LedgerSMB::Sysconfig::latex};
} else {
- for ('Print', 'Post', 'Print and Post', 'Delete') { delete $button{$_} }
+ for ('print', 'post', 'print_and_post', 'delete') { delete $button{$_} }
}
for (sort { $button{$a}->{ndx} <=> $button{$b}->{ndx} } keys %button) { $form->print_button(\%button, $_) }
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.