X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=doc%2Fdoc-scripts%2Ff2txt;h=7fb7292a5cbb6b2714b7ca0369a8ce32d85caa5f;hb=6d9b05ae272ca2122b48451c317d601e449af932;hp=4f24f7b3f5cc3dd9328c1239cf0d93946ceb680f;hpb=3634fc257bd0667daef14d72005cd87c735bbb24;p=user%2Fhenk%2Fcode%2Fexim.git diff --git a/doc/doc-scripts/f2txt b/doc/doc-scripts/f2txt index 4f24f7b3f..7fb7292a5 100755 --- 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 -# 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"; @@ -82,7 +82,7 @@ while ($_ = ) 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 ($_ =~ /^==>/)