From bd57057f2d8b64ded0969ec9029c84b15e997c53 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Thu, 10 May 2007 23:31:38 +0000
Subject: Adding a number of bugfixes

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1178 4979c152-3d1c-0410-bac9-87ea11338e46
---
 bin/is.pl  | 3 +--
 bin/pos.pl | 8 +-------
 2 files changed, 2 insertions(+), 9 deletions(-)

(limited to 'bin')

diff --git a/bin/is.pl b/bin/is.pl
index ac2235d6..af828fb8 100755
--- a/bin/is.pl
+++ b/bin/is.pl
@@ -105,8 +105,7 @@ sub invoice_links {
 
     $form->{oldlanguage_code} = $form->{language_code};
 
-    $form->get_partsgroup( \%myconfig,
-        { language_code => $form->{language_code}, searchitems => 'nolabor' } );
+    $form->get_partsgroup( \%myconfig, { all => 1 });
 
     if ( @{ $form->{all_partsgroup} } ) {
         $form->{selectpartsgroup} = "<option>\n";
diff --git a/bin/pos.pl b/bin/pos.pl
index 9e5a2114..c60ed7ae 100755
--- a/bin/pos.pl
+++ b/bin/pos.pl
@@ -278,13 +278,7 @@ sub form_header {
         if ( $form->{language_code} ne $form->{oldlanguage_code} ) {
 
             # rebuild partsgroup
-            $form->get_partsgroup(
-                \%myconfig,
-                {
-                    language_code => $form->{language_code},
-                    searchitems   => 'nolabor'
-                }
-            );
+            $form->get_partsgroup(\%myconfig, { all => 1});
             $form->{partsgroup} = "";
             for ( @{ $form->{all_partsgroup} } ) {
                 $form->{partsgroup} .= "$_->{partsgroup}--$_->{translation}\n";
-- 
cgit v1.2.3