[Koha-cvs] CVS: koha/bull order.pl,1.3,1.4

[Paul POULAIN]

Update of /cvsroot/koha/koha/bull
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4765/bull

Modified Files:
        order.pl 
Log Message:


Index: order.pl
===================================================================
RCS file: /cvsroot/koha/koha/bull/order.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** order.pl    12 Aug 2004 14:36:07 -0000      1.3
--- order.pl    2 Sep 2004 16:24:42 -0000       1.4
***************
*** 48,58 ****
  my ($count,@suppliers)=bookseller($supplier);
  
- # check if we have to "close" a basket before building page
- my $op = $query->param('op');
- my $basket = $query->param('basket');
- if ($op eq 'close') {
-       closebasket($basket);
- }
- 
  #build reult page
  my $toggle=0;
--- 48,51 ----
***************
*** 68,72 ****
                $toggle=0;
        }
!       $line{supplierid} =$suppliers[$i]->{'id'};
        $line{name} = $suppliers[$i]->{'name'};
        $line{active} = $suppliers[$i]->{'active'};
--- 61,65 ----
                $toggle=0;
        }
!       $line{aqbooksellerid} =$suppliers[$i]->{'id'};
        $line{name} = $suppliers[$i]->{'name'};
        $line{active} = $suppliers[$i]->{'active'};