diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-08 15:09:35 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-05-08 15:09:35 +0000 |
commit | 0d1e2ba95298e3a3cf2a50773387c91449176ee1 (patch) | |
tree | 919ff3cb1362b0d59442446fb5907285f4ba29f9 /bin | |
parent | 54f9a9f0c03be76ad598509a922aa6b74f3b9420 (diff) |
Applying Ashley Gittin's performance patch to /trunk
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1170 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'bin')
-rw-r--r-- | bin/is.pl | 3 | ||||
-rw-r--r-- | bin/pos.pl | 8 |
2 files changed, 2 insertions, 9 deletions
@@ -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"; @@ -281,13 +281,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"; |