Changeset 30347 for gs2-extensions/tdb/trunk/perllib/DBDrivers/GDBMTXTGZ.pm

Timestamp:

2015-12-10T12:19:20+13:00 (8 years ago)

Author:

jmt12

Message:

Continuing to refactor driver code to move shared code up to parent classes. Have all the basic drivers done...

File:

• gs2-extensions/tdb/trunk/perllib/DBDrivers/GDBMTXTGZ.pm (modified) (2 diffs)

gs2-extensions/tdb/trunk/perllib/DBDrivers/GDBMTXTGZ.pm

@@ -77 +77 @@
 # other
 #
-# All this function does now is turn the optional 'append' argument into the
-# appropriate operator for either appending to or clobbering gzip file.
+# Now only responsible for transforming the optional append argument into the
+# correct redirection operand (either > for clobber or >> for append)
 #
 sub open_infodb_write_handle
@@ -98 +98 @@
 ## open_infodb_write_handle(string) => filehandle ##
 
-
 ## @function set_infodb_entry(string, string, hashmap)
 #