Remove the <#secure special-casing, which is too special.

[gnus] / lisp / message.el

diff --git a/lisp/message.el b/lisp/message.el
index 1e9d47f..bff11b2 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -3098,11 +3098,8 @@ M-RET    `message-newline-and-reformat' (break the line and reformat)."
             (looking-at "[ \t]*\n"))
     (expand-abbrev))
   (goto-char (point-min))
-  (prog1
-      (or (search-forward (concat "\n" mail-header-separator "\n") nil t)
-          (search-forward-regexp "[^:]+:\\([^\n]\\|\n[ \t]\\)+\n\n" nil t))
-    (while (looking-at "^<#secure") (forward-line 1))))
-
+  (or (search-forward (concat "\n" mail-header-separator "\n") nil t)
+      (search-forward-regexp "[^:]+:\\([^\n]\\|\n[ \t]\\)+\n\n" nil t)))
 
 (defun message-in-body-p ()
   "Return t if point is in the message body."