Changeset 27400 for gs2-extensions/tdb-edit
- Timestamp:
- 2013-05-23T13:40:24+12:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs2-extensions/tdb-edit/trunk/src/perllib/dbutil.pm
r24068 r27400 3 3 # dbutil.pm -- gateway to utilities for reading/writing to different databases 4 4 # 5 # Copyright (C) 2008 5 # Copyright (C) 2008 DL Consulting Ltd 6 6 # 7 7 # A component of the Greenstone digital library software … … 45 45 { 46 46 # - require is fine being assigned at runtime - no need for evil eval 47 eval48 {49 50 };47 #eval 48 #{ 49 require $file; 50 #}; 51 51 } 52 52 # - this is the magic that actually instantiates the class (rubberstamp?) … … 120 120 } 121 121 122 122 # /** @function get_infodb_file_path() 123 # * Warning! Black magic follows. The first time get_infodb_file_path is 124 # * called (presumably from inexport::process_files()) for databases of type 125 # * server will actually the Server to be run complete with an initial dummy 126 # * listener. This is done so that, in parallel importing, the server will 127 # * persist until the top level import.pl (which will be the first that calls 128 # * this function) completes and removes the dummy listener. [jmt12] 123 129 sub get_infodb_file_path 124 130 {
Note:
See TracChangeset
for help on using the changeset viewer.