Changeset 21564 for main/trunk/greenstone2/perllib/IncrementalDocument.pm
- Timestamp:
- 2010-01-21T15:59:35+13:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/IncrementalDocument.pm
r21563 r21564 2 2 # 3 3 # IncrementalDocument.pm -- An object to encapsulate the Greenstone 4 # document retrieved from the GDBMdatabase.4 # document retrieved from the info database. 5 5 # 6 6 # A component of the Greenstone digital library software … … 48 48 $self->{'collection'} = $collection; 49 49 50 # An associative array of information retrieved from the GDBMdatabase50 # An associative array of information retrieved from the info database 51 51 # which maps a key string to a nested associative array listing values. 52 52 $self->{'data'} = {}; … … 147 147 my ($self) = @_; 148 148 #rint STDERR "IncrementalDocument::loadDocument()\n"; 149 # Load the raw text for the document object from GDBM149 # Load the raw text for the document object from the info database 150 150 my $collection = $self->{'collection'}; 151 151 my $index_text_directory_path = &util::filename_cat($ENV{'GSDLHOME'}, "collect", $collection, "index", "text"); … … 185 185 my $text = $self->toString(); 186 186 187 # Now store the object in the database using the GDBM utilities187 # Now store the object in the info database 188 188 my $collection = $self->{'collection'}; 189 189
Note:
See TracChangeset
for help on using the changeset viewer.