[Koha-cvs] koha/C4 Auth.pm
Joshua Ferraro
jmf at liblime.com
Tue Jul 3 06:39:03 CEST 2007
CVSROOT: /sources/koha
Module name: koha
Changes by: Joshua Ferraro <kados> 07/07/03 04:39:03
Modified files:
C4 : Auth.pm
Log message:
adding a warn to log why we're redirecting to installer
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Auth.pm?cvsroot=koha&r1=1.64&r2=1.65
Patches:
Index: Auth.pm
===================================================================
RCS file: /sources/koha/koha/C4/Auth.pm,v
retrieving revision 1.64
retrieving revision 1.65
diff -u -b -r1.64 -r1.65
--- Auth.pm 26 Jun 2007 14:30:22 -0000 1.64
+++ Auth.pm 3 Jul 2007 04:39:03 -0000 1.65
@@ -36,7 +36,7 @@
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.64 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.65 $' =~ /\d+/g;
shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v );
};
@@ -339,6 +339,7 @@
my $dbh = C4::Context->dbh;
unless (C4::Context->preference('Version')){
+ warn "No Version string in sysprefs, redirecting to Installer";
print $query->redirect("/cgi-bin/koha/installer/install.pl");
exit;
}
More information about the Koha-cvs
mailing list