From 48b7e1ecef1d768442cd3aa391e7a68865429520 Mon Sep 17 00:00:00 2001
From: =?utf8?q?St=C3=A9phane=20Delaune?= <stephane.delaune@biblibre.com>
Date: Wed, 15 Oct 2014 15:23:35 +0200
Subject: [PATCH] Bug 13085: bugfix to allow call of export.pl in commandline
 without id_list_file parameter

Test plan
1/ run ./tools/export.pl
2/ notice an error like cannot open 0: No such file or directory at ./tools/export.pl line 209.
3/ apply patch
4/ run again
5/ no errors

Signed-off-by: Chris <chris@bigballofwax.co.nz>
Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Works as described, adding an additional check.

Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
---
 tools/export.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/export.pl b/tools/export.pl
index 8a5c2a5da3..97415f8d0f 100755
--- a/tools/export.pl
+++ b/tools/export.pl
@@ -206,7 +206,7 @@ if ( $op eq "export" ) {
         my $authtype        = $query->param('authtype');
         my $filefh;
         if ($commandline) {
-            open $filefh,"<", $id_list_file or die "cannot open $id_list_file: $!";
+            open $filefh,"<", $id_list_file or die "cannot open $id_list_file: $!" if $id_list_file;
         } else {
             $filefh = $query->upload("id_list_file");
         }
-- 
2.39.5