Changeset 27319 for main/trunk
- Timestamp:
- 2013-05-09T13:31:55+12:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/cgiactions/baseaction.pm
r27318 r27319 330 330 my $current_time = strftime("%Y/%m/%d %H:%M:%S\n", localtime($current_timestamp)); # POSIX 331 331 332 my $infodbtype = $self->{'infodbtype'};333 my $key_rec = &dbutil::read_infodb_entry( $infodbtype, $key_db_file_path, $user_key);332 # infodbtype can be different for different collections, but the key DB is gdbm 333 my $key_rec = &dbutil::read_infodb_entry("gdbm", $key_db_file_path, $user_key); 334 334 $key_rec->{"time"}->[0] = $current_time; 335 335 my $status = &dbutil::set_infodb_entry($infodbtype, $key_db_file_path, $user_key, $key_rec);
Note:
See TracChangeset
for help on using the changeset viewer.