[Koha-cvs] koha/acqui updatesupplier.pl [rel_3_0]

[paul poulain]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     paul poulain <tipaul>   07/01/24 13:45:27

Modified files:
        acqui          : updatesupplier.pl 

Log message:
        $id & $data{id} where almost for the same use : cleaning to have only 1

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/updatesupplier.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.9&r2=1.9.2.1

Patches:
Index: updatesupplier.pl
===================================================================
RCS file: /sources/koha/koha/acqui/updatesupplier.pl,v
retrieving revision 1.9
retrieving revision 1.9.2.1
diff -u -b -r1.9 -r1.9.2.1
--- updatesupplier.pl   1 Aug 2006 15:03:19 -0000       1.9
+++ updatesupplier.pl   24 Jan 2007 13:45:27 -0000      1.9.2.1
@@ -85,12 +85,11 @@
 $data{'listincgst'}=$input->param('list_gst');
 $data{'invoiceincgst'}=$input->param('invoice_gst');
 $data{'discount'}=$input->param('discount');
-my $id=$input->param('id');
-if ($data{'id'} != 0){
+if ($data{'id'}){
   ModBookseller(\%data);
 } else {
-  $id=AddBookseller(\%data);
+    $data{id}=AddBookseller(\%data);
 }
 
 #redirect to booksellers.pl
-print $input->redirect("booksellers.pl?supplier=$id");
+print $input->redirect("booksellers.pl?supplier=".$data{id});