From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 24 Jun 2000 13:06:20 +0000 (+0100)
Subject: [ID 20000624.001] PERL_DL_DEBUG=1 DynaLoader message appears to be wrong
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9f8e7e48825eeed08be03f7e2a345604d7385986;p=p5sagit%2Fp5-mst-13.2.git

[ID 20000624.001] PERL_DL_DEBUG=1 DynaLoader message appears to be wrong
Message-Id: <200006241206.NAA03771@Bagpuss.unfortu.net>

p4raw-id: //depot/cfgperl@6245
---

diff --git a/ext/DynaLoader/DynaLoader_pm.PL b/ext/DynaLoader/DynaLoader_pm.PL
index 55b8eca..b7b45d8 100644
--- a/ext/DynaLoader/DynaLoader_pm.PL
+++ b/ext/DynaLoader/DynaLoader_pm.PL
@@ -21,7 +21,7 @@ package DynaLoader;
 #   feast like to keep their secret; for wonder makes the words of
 #   praise louder.'
 
-#   (Quote from Tolkien sugested by Anno Siegel.)
+#   (Quote from Tolkien suggested by Anno Siegel.)
 #
 # See pod text at end of file for documentation.
 # See also ext/DynaLoader/README in source tree for other information.
@@ -170,8 +170,8 @@ sub bootstrap {
 
     print STDERR "DynaLoader::bootstrap for $module ",
 		($Is_MacOS
-                      ? "(auto/$modpname/$modfname.$dl_dlext)\n" :
-		 	"(:auto:$modpname:$modfname.$dl_dlext)\n")
+		       ? "(:auto:$modpname:$modfname.$dl_dlext)\n" :
+		       "(auto/$modpname/$modfname.$dl_dlext)\n")
 	if $dl_debug;
 
     foreach (@INC) {