[Koha-cvs] CVS: koha/misc installer.pl,1.3,1.4

[Paul POULAIN]

Update of /cvsroot/koha/koha/misc
In directory sc8-pr-cvs1:/tmp/cvs-serv26176

Modified Files:
        installer.pl 
Log Message:
bugzilla bug n°129 fixed

Index: installer.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/installer.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** installer.pl        26 Nov 2002 14:58:08 -0000      1.3
--- installer.pl        27 Nov 2002 17:49:40 -0000      1.4
***************
*** 148,151 ****
--- 148,153 ----
  unless (eval {require Date::Manip})       { push @missing,"Date::Manip" };
  unless (eval {require DBD::mysql})        { push @missing,"DBD::mysql" };
+ unless (eval {require MARC::Record}) { push @missing, "MARC::Record"};
+ 
  unless (eval {require Net::Z3950})        {
      print qq|
***************
*** 942,946 ****
  }
  if ($answer eq "1") {
! system("cat misc/marc_datas/marc21_en/structure_def.sql | $mysqldir/bin/mysql 
-u$mysqluser -p$mysqlpass $dbname");
  }
  if ($answer eq "2") {
--- 944,948 ----
  }
  if ($answer eq "1") {
! system("cat script/misc/marc_datas/marc21_en/structure_def.sql | 
$mysqldir/bin/mysql -u$mysqluser -p$mysqlpass $dbname");
  }
  if ($answer eq "2") {