Testsuite: account for (now) properly working Perl locale

[exim.git] / doc / doc-scripts / f2h

diff --git a/doc/doc-scripts/f2h b/doc/doc-scripts/f2h
index 6e53480bbc0e702cc45c48e1863859c7442822ea..221a801945da117aeadb2fabee2f9787c3c7bf1b 100755 (executable)
--- a/doc/doc-scripts/f2h
+++ b/doc/doc-scripts/f2h
@@ -83,7 +83,7 @@ return $s;
 
 # We want to read the file paragraph by paragraph; Perl only does this if the
 # separating lines are truly blank. Having been caught by lines containing
-# whitespace before, do a detrailing pass first.
+# whitespace before, do a de-trailing pass first.
 
 open(IN, "$ARGV[0]") || die "can't open $ARGV[0] (preliminary)\n";
 open(OUT, ">$ARGV[0]-$$") || die "can't open $ARGV[0]-$$\n";
@@ -298,7 +298,7 @@ while ($_ = <IN>)
     next;
     }
 
-  # If a paragraph begins ==> it is a display which must remain verbatin
+  # If a paragraph begins ==> it is a display which must remain verbatim
   # and not be reformatted. The flag gets turned into spaces.
 
   if ($_ =~ /^==>/)