Taint: fix off-by-one in is_tainted(). Bug 2634

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

diff --git a/doc/doc-scripts/f2txt b/doc/doc-scripts/f2txt
index 4f24f7b3f5cc3dd9328c1239cf0d93946ceb680f..7fb7292a5cbb6b2714b7ca0369a8ce32d85caa5f 100755 (executable)
--- a/doc/doc-scripts/f2txt
+++ b/doc/doc-scripts/f2txt
@@ -55,7 +55,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
 
 # 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";
 
 open(IN, "$ARGV[0]") || die "can't open $ARGV[0] (preliminary)\n";
 open(OUT, ">$ARGV[0]-$$") || die "can't open $ARGV[0]-$$\n";


@@ -82,7 +82,7 @@ while ($_ = <IN>)
 
   next if /^\#\#/;
 
 
   next if /^\#\#/;
 

-  # 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 ($_ =~ /^==>/)
   # and not be reformatted. The flag gets turned into spaces.
 
   if ($_ =~ /^==>/)