Changeset 30370 for main/trunk/greenstone2/perllib/DBDrivers/70HyphenFormat.pm

Timestamp:

2016-01-12T11:00:53+13:00 (8 years ago)

Author:

jmt12

Message:

Reverting these back to the older but better supported ISA approach to declaring inheritance. Not even sure why I used the new parent mechanism (aside from possibly copying from tutorial)... can I still blame baby brain after 10 months?

File:

• main/trunk/greenstone2/perllib/DBDrivers/70HyphenFormat.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/DBDrivers/70HyphenFormat.pm

@@ -46 +46 @@
 use util;
 use FileUtils;
-use parent 'DBDrivers::BaseDBDriver';
+
+use DBDrivers::BaseDBDriver;
+
+BEGIN {
+    @DBDrivers::70HyphenFormat::ISA = ('DBDrivers::BaseDBDriver');
+}
 
 use constant {