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

[..hidden..]

Revision: 525
          http://svn.sourceforge.net/ledger-smb/?rev=525&view=rev
Author:   einhverfr
Date:     2006-11-11 23:11:59 -0800 (Sat, 11 Nov 2006)

Log Message:
-----------
Fixed 2 bugs:  import text not working with alphanumeric partnumbers and commit ineffective in IR::retrieve_item

Modified Paths:
--------------
    trunk/LedgerSMB/IR.pm
    trunk/bin/ir.pl

Modified: trunk/LedgerSMB/IR.pm
===================================================================
--- trunk/LedgerSMB/IR.pm	2006-11-12 06:55:19 UTC (rev 524)
+++ trunk/LedgerSMB/IR.pm	2006-11-12 07:11:59 UTC (rev 525)
@@ -1214,8 +1214,6 @@
 		$where .= " ORDER BY 2";
 	}
 
-	# connect to database
-	my $dbh = $form->dbconnect($myconfig);
 
 	my $query = qq|
 		   SELECT p.id, p.partnumber, p.description,

Modified: trunk/bin/ir.pl
===================================================================
--- trunk/bin/ir.pl	2006-11-12 06:55:19 UTC (rev 524)
+++ trunk/bin/ir.pl	2006-11-12 07:11:59 UTC (rev 525)
@@ -635,7 +635,7 @@
   my @i_lines = split(/(\n|\r|\r\n)/, $form->{import_text});
   foreach $i (@i_lines){
     chomp($i);
-    if ($i != ""){ # Strip out blank lines
+    if ($i ne ""){ # Strip out blank lines
       push @o_list, $i;
     }
   }


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