[Koha-cvs] CVS: koha/misc uninstall.pl,1.1,1.2

[Paul POULAIN]

Update of /cvsroot/koha/koha/misc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv25947/misc

Modified Files:
	uninstall.pl 
Log Message:
uninstaller

Index: uninstall.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/uninstall.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** uninstall.pl	21 Jun 2004 17:13:33 -0000	1.1
--- uninstall.pl	22 Jun 2004 15:33:06 -0000	1.2
***************
*** 23,39 ****
  my $config = ReadConfigFile("/etc/koha.conf");
  # to remove web sites:
! print "\nrm -rf ".$config->{intranetdir};
! print "\nrm -rf ".$config->{opacdir};
  # remove mySQL stuff
- # DB
- print "\nmysqladmin -f -u".$config->{user}." -p".$config->{pass}." drop ".$config->{database};
  # user
  print "enter mySQL root password, please\n";
  my $response=<STDIN>;
  chomp $response;
! print "\nmysql -uroot -p$response -Dmysql -e\"delete from user where user='".$config->{user}.'"';
  # reload mysql
! print "\nmysqladmin -uroot -p$response reload";
! print "\nrm -f /etc/koha-httpd.conf";
! print "\nrm -f /etc/koha.conf";
! print "\nEDIT httpd.conf to remove /etc/koha-httpd.conf\n";
--- 23,40 ----
  my $config = ReadConfigFile("/etc/koha.conf");
  # to remove web sites:
! system("rm -rf ".$config->{intranetdir});
! system("\nrm -rf ".$config->{opacdir});
  # remove mySQL stuff
  # user
  print "enter mySQL root password, please\n";
  my $response=<STDIN>;
  chomp $response;
! # DB
! system("mysqladmin -f -uroot -p$response drop ".$config->{database});
! system("mysql -uroot -p$response -Dmysql -e\"delete from user where user='".$config->{user}.'\'"');
! system("mysql -uroot -p$response -Dmysql -e\"delete from db where user='".$config->{user}.'\'"');
  # reload mysql
! system("mysqladmin -uroot -p$response reload");
! system("rm -f /etc/koha-httpd.conf");
! system("rm -f /etc/koha.conf");
! print "EDIT httpd.conf to remove /etc/koha-httpd.conf\n";