bug#7743: bug #7743: unrmail loses extra blank line at end of message [PATCH]

[Mark Lillibridge]

    The automatic system seems not to have noticed, but I provided a
patch for this bug:

ts-rhel5 [124]% ( setenv LC_ALL C ; setenv TZ UTC0 ; diff -Naur 
original-unrmail.el unrmail.el)
--- original-unrmail.el 2011-11-13 19:57:25.156549000 +0000
+++ unrmail.el  2011-11-13 19:58:34.826505000 +0000
@@ -232,10 +232,9 @@
              (while (search-forward "\nFrom " nil t)
                (forward-char -5)
                (insert ?>)))
-           ;; Make sure the message ends with two newlines
+           ;; Add terminator blank line to message
            (goto-char (point-max))
-           (unless (looking-back "\n\n")
-             (insert "\n"))
+           (insert "\n")
            ;; Write it to the output file, suitably encoded.
            (let ((coding-system-for-write coding))
              (write-region (point-min) (point-max) to-file t