Changeset 29316 for gs2-extensions

Timestamp:

2014-09-18T16:27:43+12:00 (10 years ago)

Author:

jmt12

Message:

Adding in support for databases that merge as a final step

File:

• gs2-extensions/tdb-edit/trunk/src/perllib/dbutil.pm (modified) (2 diffs)

gs2-extensions/tdb-edit/trunk/src/perllib/dbutil.pm

@@ -211 +211 @@
 }
 ## supportsDatestamp() ##
+
+
+## @function supportsMerge
+#
+sub supportsMerge
+{
+  my $infodb_type = shift(@_);
+  return &dbutil::test_dynamic_driver_function('merge_databases', $infodb_type);
+}
+## supportsMerge() ##
 
 
@@ -321 +331 @@
 
 
+## @function
+#
+sub merge_databases
+{
+  my $infodb_type = shift(@_);
+  # Make a call to the dynamically loaded driver to open the connection.
+  return &dbutil::call_dynamic_driver_function('merge_databases', $infodb_type, @_);
+}
+##
+
+
 # ---- GENERAL FUNCTIONS --------