Changeset 27320 for main/trunk/greenstone2/perllib/cgiactions/baseaction.pm

Timestamp:

2013-05-09T13:39:24+12:00 (11 years ago)

Author:

ak19

Message:

Oversight to previous commit: one more minor change. Previous commit message: key DB is gdbm and has no way of changing the DB type. Can't use infodbtype to work out its DB type, especially as infodbtype can be different on a per collection basis.

File:

• main/trunk/greenstone2/perllib/cgiactions/baseaction.pm (modified) (2 diffs)

main/trunk/greenstone2/perllib/cgiactions/baseaction.pm

@@ -35 +35 @@
 use POSIX;
 
-our $authentication_enabled = 1; # debugging flag (can debug without authentication when set to 0)
+our $authentication_enabled = 0; # debugging flag (can debug without authentication when set to 0)
 our $mail_enabled = 0;
 
@@ -333 +333 @@
             my $key_rec = &dbutil::read_infodb_entry("gdbm", $key_db_file_path, $user_key);
             $key_rec->{"time"}->[0] = $current_time;
-            my $status = &dbutil::set_infodb_entry($infodbtype, $key_db_file_path, $user_key, $key_rec);
+            my $status = &dbutil::set_infodb_entry("gdbm", $key_db_file_path, $user_key, $key_rec);
             
             if ($status != 0) {