[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha installer.pl,1.2.2.51,1.2.2.52 koha.upgrade,1.1.2.6
From: |
Steve Tonnesen |
Subject: |
[Koha-cvs] CVS: koha installer.pl,1.2.2.51,1.2.2.52 koha.upgrade,1.1.2.6,1.1.2.7 |
Date: |
Fri, 05 Jul 2002 12:18:19 -0700 |
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv18545
Modified Files:
Tag: rel-1-2
installer.pl koha.upgrade
Log Message:
Added check that programs are being run as root.
Index: installer.pl
===================================================================
RCS file: /cvsroot/koha/koha/installer.pl,v
retrieving revision 1.2.2.51
retrieving revision 1.2.2.52
diff -C2 -r1.2.2.51 -r1.2.2.52
*** installer.pl 4 Jul 2002 17:42:23 -0000 1.2.2.51
--- installer.pl 5 Jul 2002 19:18:16 -0000 1.2.2.52
***************
*** 4,7 ****
--- 4,11 ----
use strict; # please develop with the strict pragma
+ if ($<) {
+ print "\n\nYou must run koha.upgrade as root.\n\n";
+ exit;
+ }
unless ($< == 0) {
print "You must be root to run this script.\n";
Index: koha.upgrade
===================================================================
RCS file: /cvsroot/koha/koha/koha.upgrade,v
retrieving revision 1.1.2.6
retrieving revision 1.1.2.7
diff -C2 -r1.1.2.6 -r1.1.2.7
*** koha.upgrade 3 Jul 2002 17:07:09 -0000 1.1.2.6
--- koha.upgrade 5 Jul 2002 19:18:17 -0000 1.1.2.7
***************
*** 1,4 ****
--- 1,12 ----
#!/usr/bin/perl -w
+ use diagnostics;
+ use strict; # please develop with the strict pragma
+
+ if ($<) {
+ print "\n\nYou must run koha.upgrade as root.\n\n";
+ exit;
+ }
+
my %configfile;
open (KC, "/etc/koha.conf");
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha installer.pl,1.2.2.51,1.2.2.52 koha.upgrade,1.1.2.6,1.1.2.7,
Steve Tonnesen <=