From dd779e7ff888ad90d0cefff239b5e77fc80d991e Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Sun, 25 May 2008 18:27:28 +0000
Subject: Fixes to per-transaction separation of duties

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2155 4979c152-3d1c-0410-bac9-87ea11338e46
---
 bin/aa.pl | 5 +++++
 bin/gl.pl | 5 +++++
 2 files changed, 10 insertions(+)

(limited to 'bin')

diff --git a/bin/aa.pl b/bin/aa.pl
index b02d69a8..9d4d5ed1 100644
--- a/bin/aa.pl
+++ b/bin/aa.pl
@@ -889,6 +889,11 @@ sub form_footer {
               { ndx => 8, key => 'D', value => $locale->text('Delete') },
         );
 
+        if ($form->{separate_duties}){
+            $button{post}->{value} = $locale->text('Save');
+            $form->hide_form('separate_duties');
+        }
+
         if ( $form->{id} ) {
 
             if ( $form->{locked} || ( $transdate && $transdate <= $closedto ) )
diff --git a/bin/gl.pl b/bin/gl.pl
index c79d56d2..9a0d8572 100644
--- a/bin/gl.pl
+++ b/bin/gl.pl
@@ -1256,6 +1256,11 @@ sub form_footer {
               { ndx => 8, key => 'D', value => $locale->text('Delete') },
         );
 
+        if ($form->{separate_duties}){
+            $form->hide_form('separate_duties');
+            $button{post}->{value} = $locale->text('Save');
+        }
+
         %a = ();
 
         if ( $form->{id} ) {
-- 
cgit v1.2.3