From: ueno <ueno>
Date: Fri, 9 Jun 2000 09:44:43 +0000 (+0000)
Subject: * mime-edit.el (mime-edit-insert-key): Insert a text tag when
X-Git-Tag: emy-1_13_7~5
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=012df9900067afbe3fc62957a144bdfe57880af0;p=elisp%2Fsemi.git

* mime-edit.el (mime-edit-insert-key): Insert a text tag when
the buffer has any trailing text.
---

diff --git a/ChangeLog b/ChangeLog
index 44cfc4a..0372f12 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2000-06-09   Daiki Ueno  <ueno@unixuser.org>
+
+	* mime-edit.el (mime-edit-insert-key): Insert a text tag when
+	the buffer has any trailing text.
+
 2000-06-05  Shugo Maeda <shugo@ruby-lang.org>
 
 	* pgg-gpg.el (pgg-scheme-insert-key): Don't quote user id.
diff --git a/mime-edit.el b/mime-edit.el
index 922adb1..0b953ad 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -2304,7 +2304,10 @@ and insert data encoded as ENCODING."
   (interactive "P")
   (mime-edit-insert-tag "application" "pgp-keys")
   (mime-edit-define-encoding "7bit")
-  (pgg-insert-key))
+  (pgg-insert-key)
+  (if (and (not (eobp))
+	   (not (looking-at mime-edit-single-part-tag-regexp)))
+      (insert (mime-make-text-tag) "\n")))
 
 
 ;;; @ flag setting