|
Lines 21-26
Link Here
|
| 21 |
# along with Koha; if not, see <http://www.gnu.org/licenses>. |
21 |
# along with Koha; if not, see <http://www.gnu.org/licenses>. |
| 22 |
|
22 |
|
| 23 |
use Modern::Perl; |
23 |
use Modern::Perl; |
|
|
24 |
use HTML::Entities; |
| 24 |
use C4::Auth; |
25 |
use C4::Auth; |
| 25 |
use C4::Koha; |
26 |
use C4::Koha; |
| 26 |
use C4::Output; |
27 |
use C4::Output; |
|
Lines 72-77
the supplier this script have to display the basket.
Link Here
|
| 72 |
|
73 |
|
| 73 |
our $query = new CGI; |
74 |
our $query = new CGI; |
| 74 |
our $basketno = $query->param('basketno'); |
75 |
our $basketno = $query->param('basketno'); |
|
|
76 |
$basketno = HTML::Entities::encode($basketno); |
| 75 |
our $ean = $query->param('ean'); |
77 |
our $ean = $query->param('ean'); |
| 76 |
our $booksellerid = $query->param('booksellerid'); |
78 |
our $booksellerid = $query->param('booksellerid'); |
| 77 |
my $duplinbatch = $query->param('duplinbatch'); |
79 |
my $duplinbatch = $query->param('duplinbatch'); |
| 78 |
- |
|
|