Changeset 21414


Ignore:
Timestamp:
01/04/10 23:13:05 (11 years ago)
Author:
davidb
Message:

Separation of different database back-ends into individual files

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/plugouts/BasePlugout.pm

    r20902 r21414  
    3737use GDBMUtils;
    3838
     39use dbutil::gdbm;
    3940
    4041# suppress the annoying "subroutine redefined" warning that various
     
    762763
    763764    my $infodb_file_handle
    764     = &dbutil::open_infodb_write_handle_gdbm($doc_db,"append");
    765     &dbutil::write_infodb_entry_gdbm($infodb_file_handle,$oid,$oid_files);
    766     &dbutil::close_infodb_write_handle_gdbm($infodb_file_handle);
     765    = &dbutil::gdbm::open_infodb_write_handle($doc_db,"append");
     766    &dbutil::gdbm::write_infodb_entry($infodb_file_handle,$oid,$oid_files);
     767    &dbutil::gdbm::close_infodb_write_handle($infodb_file_handle);
    767768
    768769
Note: See TracChangeset for help on using the changeset viewer.