Mercurial > emacs

changeset 48810:1626973bdb2b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make sure every message ends with a blank line, because some mbox parsers require a blank line before "From " lines.
author Pavel Janík <Pavel@Janik.cz>
date Wed, 11 Dec 2002 23:31:53 +0000
parents 31f6d22dc374
children 0e87fa6109bb
files lib-src/b2m.pl
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lib-src/b2m.pl	Wed Dec 11 21:29:31 2002 +0000
+++ b/lib-src/b2m.pl	Wed Dec 11 23:31:53 2002 +0000
@@ -30,7 +30,7 @@
 use Date::Parse;
 
 my($whoami) = basename $0;
-my($version) = '$Revision: 1.2 $';
+my($version) = '$Revision: 1.3 $';
 my($usage) = "Usage: $whoami [--help] [--version] [--[no]full-headers] [Babyl-file]
 \tBy default, full headers are printed.\n";
 
@@ -102,8 +102,9 @@
 	$full_header = $header;
     }
 
-    # End message with a single newline
-    s/\s+$/\n/;
+    # End message with two newlines (some mbox parsers require a blank
+    # line before the next "From " line).
+    s/\s+$/\n\n/;
 
     # Quote "^From "
     s/(^|\n)From /$1>From /g;