Changeset 18659

Show
Ignore:
Timestamp:
11.03.2009 13:13:55 (10 years ago)
Author:
kjdon
Message:

we now use .gdb as gdbm db file extension instead of ldb/bdb

Location:
gsdl/trunk/perllib
Files:
3 modified

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/plugins/ArchivesInfPlugin.pm

    r18528 r18659  
    2525 
    2626# plugin which reads through an archives.inf (or GDBM equivalent, 
    27 # archiveinf-doc.{ldb,bdb} file (i.e. the file generated in the 
     27# archiveinf-doc.gdb file (i.e. the file generated in the 
    2828# archives directory when an import is done), processing each file it 
    2929# finds 
     
    204204    # see if this has a archives information file within it 
    205205##    my $archive_info_filename = &util::filename_cat($base_dir,$file,"archives.inf"); 
    206     my $db_ext = &util::is_little_endian() ? ".ldb" : ".bdb"; 
    207     my $doc_db = "archiveinf-doc$db_ext"; 
     206 
     207    my $doc_db = "archiveinf-doc.gdb"; 
    208208    my $archive_info_filename = &util::filename_cat($base_dir,$file,$doc_db); 
    209209 
  • gsdl/trunk/perllib/plugins/DirectoryPlugin.pm

    r18523 r18659  
    132132    my $output_dir = $processor->getoutputdir(); 
    133133##  my $archives_inf = &util::filename_cat($output_dir,"archives.inf"); 
    134     my $db_ext = &util::is_little_endian() ? ".ldb" : ".bdb"; 
    135     my $doc_db = "archiveinf-doc$db_ext"; 
     134    my $doc_db = "archiveinf-doc.gdb"; 
    136135        my $archives_inf = &util::filename_cat($output_dir,$doc_db); 
    137136 
  • gsdl/trunk/perllib/plugouts/BasePlugout.pm

    r18528 r18659  
    701701 
    702702    my $output_dir = $self->{'output_dir'}; 
    703     my $db_ext = &util::is_little_endian() ? ".ldb" : ".bdb"; 
    704  
    705     my $doc_db = &util::filename_cat($output_dir,"archiveinf-doc$db_ext"); 
    706     my $src_db = &util::filename_cat($output_dir,"archiveinf-src$db_ext"); 
     703 
     704    my $doc_db = &util::filename_cat($output_dir,"archiveinf-doc.gdb"); 
     705    my $src_db = &util::filename_cat($output_dir,"archiveinf-src.gdb"); 
    707706 
    708707    my $doc_db_text = "";