SF.net SVN: ledger-smb: [1170] trunk

[..hidden..]

Revision: 1170
          http://svn.sourceforge.net/ledger-smb/?rev=1170&view=rev
Author:   einhverfr
Date:     2007-05-08 08:09:35 -0700 (Tue, 08 May 2007)

Log Message:
-----------
Applying Ashley Gittin's performance patch to /trunk

Modified Paths:
--------------
    trunk/CONTRIBUTORS
    trunk/bin/is.pl
    trunk/bin/pos.pl

Modified: trunk/CONTRIBUTORS
===================================================================
--- trunk/CONTRIBUTORS	2007-05-08 05:46:57 UTC (rev 1169)
+++ trunk/CONTRIBUTORS	2007-05-08 15:09:35 UTC (rev 1170)
@@ -60,6 +60,9 @@
 Chris Nighswonger, <cnighswonger @ foundations.edu> contributed the
 shebang-strawberry.pl
 
+Ashley Gittins contributed <agittins @ purple.dropbear.id.au> has contributed 
+some performance fixes and has contributed a great deal of work to our web site.
+
 Original Authors of SQL-Ledger:
 ===================================
 Dieter Simader <dsimader @ sql-ledger.com>

Modified: trunk/bin/is.pl
===================================================================
--- trunk/bin/is.pl	2007-05-08 05:46:57 UTC (rev 1169)
+++ trunk/bin/is.pl	2007-05-08 15:09:35 UTC (rev 1170)
@@ -105,8 +105,7 @@
 
     $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";

Modified: trunk/bin/pos.pl
===================================================================
--- trunk/bin/pos.pl	2007-05-08 05:46:57 UTC (rev 1169)
+++ trunk/bin/pos.pl	2007-05-08 15:09:35 UTC (rev 1170)
@@ -281,13 +281,7 @@
         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";


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