Change 11420 by pudge@pudge-mobile on 2001/07/20 18:02:05

        Make DB_File the default for MLDBM on MacOS.

Affected files ...

... //depot/maint-5.6/macperl/macos/bundled_lib/blib/lib/MLDBM.pm#2 edit

Differences ...

==== //depot/maint-5.6/macperl/macos/bundled_lib/blib/lib/MLDBM.pm#2 (text) ====
Index: perl/macos/bundled_lib/blib/lib/MLDBM.pm
--- perl/macos/bundled_lib/blib/lib/MLDBM.pm.~1~        Fri Jul 20 12:15:05 2001
+++ perl/macos/bundled_lib/blib/lib/MLDBM.pm    Fri Jul 20 12:15:05 2001
@@ -92,7 +92,11 @@
 # you might want to change this default to something more efficient
 # like DB_File (you can always override it in the use list)
 #
-$MLDBM::UseDB          = "SDBM_File"           unless $MLDBM::UseDB;
+if ($^O eq 'MacOS') {
+    $MLDBM::UseDB      = "DB_File"             unless $MLDBM::UseDB;
+} else {
+    $MLDBM::UseDB      = "SDBM_File"           unless $MLDBM::UseDB;
+}
 $MLDBM::Serializer     = 'Data::Dumper'        unless $MLDBM::Serializer;
 $MLDBM::Key            = '$MlDbM'              unless $MLDBM::Key;
 $MLDBM::DumpMeth       = ""                    unless $MLDBM::DumpMeth;
End of Patch.

Reply via email to