Fix warning about use of undefined variable, found when endmenu

   called from marcimport.pl

diff --git a/C4/Output.pm b/C4/Output.pm
index 3af786b..7961aa5 100644 (file)
--- a/C4/Output.pm
+++ b/C4/Output.pm
@@ -137,6 +137,7 @@ sub startmenu{
 
 sub endmenu {
   my ($type) = @_;
+  if ( ! defined $type ) { $type=''; }
   if ($type eq 'issue') {
     open (FILE,"$path/issues-bottom.inc") || die;
   } elsif ($type eq 'opac') {