Because of #17097.
Jarkko Hietaniemi [Sat, 8 Jun 2002 19:11:49 +0000 (19:11 +0000)]
p4raw-id: //depot/perl@17111

configpm

index 4bdde61..a83e866 100755 (executable)
--- a/configpm
+++ b/configpm
@@ -500,7 +500,8 @@ EOF
 }
 
 if ($opts{glossary}) {
-  <GLOS>;                              # Skip the preamble
+    <GLOS>;                            # Skip the "DO NOT EDIT"
+    <GLOS>;                            # Skip the preamble
   while (<GLOS>) {
     process;
     print CONFIG;