[Koha-cvs] CVS: koha installer.pl,1.2.2.33,1.2.2.34

[Steve Tonnesen]

Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv7208

Modified Files:
      Tag: rel-1-2
	installer.pl 
Log Message:
installer.pl will now offer to install the sample data.


Index: installer.pl
===================================================================
RCS file: /cvsroot/koha/koha/installer.pl,v
retrieving revision 1.2.2.33
retrieving revision 1.2.2.34
diff -C2 -r1.2.2.33 -r1.2.2.34
*** installer.pl	25 Jun 2002 20:30:41 -0000	1.2.2.33
--- installer.pl	25 Jun 2002 21:03:39 -0000	1.2.2.34
***************
*** 613,657 ****
  
  
!     print "\n\nWould you like to add a branch and printer? [Y]/N: ";
!     chomp($input = <STDIN>);
  
  
!     unless ($input =~/^n/i) {
! 	my $branch='Main Library';
! 	print "Enter a name for the library branch [$branch]: ";
! 	chomp($input = <STDIN>);
! 	if ($input) {
! 	    $branch=$input;
! 	}
! 	$branch=~s/[^A-Za-z0-9\s]//g;
! 	my $branchcode=$branch;
! 	$branchcode=~s/[^A-Za-z0-9]//g;
! 	$branchcode=uc($branchcode);
! 	$branchcode=substr($branchcode,0,4);
! 	print "Enter a four letter code for your branch [$branchcode]: ";
! 	chomp($input = <STDIN>);
! 	if ($input) {
! 	    $branchcode=$input;
! 	}
! 	$branchcode=~s/[^A-Z]//g;
! 	$branchcode=uc($branchcode);
! 	$branchcode=substr($branchcode,0,4);
! 	print "Adding branch '$branch' with code '$branchcode'.\n";
! 	system("$mysqldir/bin/mysql -u$mysqluser -p$mysqlpass Koha -e \"insert into branches (branchcode,branchname,issuing) values ('$branchcode', '$branch', 1)\"");
! 	my $printername='Library Printer';
! 	print "Enter a name for the printer [$printername]: ";
! 	chomp($input = <STDIN>);
! 	if ($input) {
! 	    $printername=$input;
! 	}
! 	$printername=~s/[^A-Za-z0-9\s]//g;
! 	my $printerqueue='lp';
! 	print "Enter the queue for the printer [$printerqueue]: ";
  	chomp($input = <STDIN>);
! 	if ($input) {
! 	    $printerqueue=$input;
  	}
- 	$printerqueue=~s/[^A-Za-z0-9]//g;
- 	system("$mysqldir/bin/mysql -u$mysqluser -p$mysqlpass Koha -e \"insert into printers (printername,printqueue,printtype) values ('$printername', '$printerqueue', '')\"");
      }
  
--- 613,676 ----
  
  
!     print qq|
  
+ If you are installing Koha for evaluation purposes,  I have a batch of sample
+ data that you can install now.
  
! If you are installing Koha with the intention of populating it with your own
! data, you probably don't want this sample data installed.
! 
! |;
!     print "\n\nWould you like to install the sample data? Y/[N]: ";
!     chomp($input = <STDIN>);
!     unless ($input =~/^y/i) {
! 	system("gunzip sampledata-1.2.gz");
! 	system("cat sampledata-1.2 | mysql -u$mysqluser -p$mysqlpass $dbname");
! 	system("gzip -9 sampledata-1.2");
! 	system("$mysqldir/bin/mysql -u$mysqluser -p$mysqlpass $dbname -e \"insert into branches (branchcode,branchname,issuing) values ('Main', 'Main Library', 1)\"");
! 	system("$mysqldir/bin/mysql -u$mysqluser -p$mysqlpass $dbname -e \"insert into printers (printername,printqueue,printtype) values ('Circulation Desk Printer', 'lp', 'hp')\"");
!     } else {
! 	print "\n\nWould you like to add a branch and printer? [Y]/N: ";
  	chomp($input = <STDIN>);
! 
! 
! 	unless ($input =~/^n/i) {
! 	    my $branch='Main Library';
! 	    print "Enter a name for the library branch [$branch]: ";
! 	    chomp($input = <STDIN>);
! 	    if ($input) {
! 		$branch=$input;
! 	    }
! 	    $branch=~s/[^A-Za-z0-9\s]//g;
! 	    my $branchcode=$branch;
! 	    $branchcode=~s/[^A-Za-z0-9]//g;
! 	    $branchcode=uc($branchcode);
! 	    $branchcode=substr($branchcode,0,4);
! 	    print "Enter a four letter code for your branch [$branchcode]: ";
! 	    chomp($input = <STDIN>);
! 	    if ($input) {
! 		$branchcode=$input;
! 	    }
! 	    $branchcode=~s/[^A-Z]//g;
! 	    $branchcode=uc($branchcode);
! 	    $branchcode=substr($branchcode,0,4);
! 	    print "Adding branch '$branch' with code '$branchcode'.\n";
! 	    system("$mysqldir/bin/mysql -u$mysqluser -p$mysqlpass $dbname -e \"insert into branches (branchcode,branchname,issuing) values ('$branchcode', '$branch', 1)\"");
! 	    my $printername='Library Printer';
! 	    print "Enter a name for the printer [$printername]: ";
! 	    chomp($input = <STDIN>);
! 	    if ($input) {
! 		$printername=$input;
! 	    }
! 	    $printername=~s/[^A-Za-z0-9\s]//g;
! 	    my $printerqueue='lp';
! 	    print "Enter the queue for the printer [$printerqueue]: ";
! 	    chomp($input = <STDIN>);
! 	    if ($input) {
! 		$printerqueue=$input;
! 	    }
! 	    $printerqueue=~s/[^A-Za-z0-9]//g;
! 	    system("$mysqldir/bin/mysql -u$mysqluser -p$mysqlpass $dbname -e \"insert into printers (printername,printqueue,printtype) values ('$printername', '$printerqueue', '')\"");
  	}
      }