PERFORCE change 11420 for review
[email protected] (Chris Nandor) Fri, 20 Jul 2001 15:36:49 -0400
| Newsgroups | perl.perl5.changes.mac |
|---|---|
| Message-ID | <p05100305b77e38c708ba@[10.0.1.107]> |
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.