2 files changed, 8 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 978df486701..06a73d25b28 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2002-04-29  Kim F. Storm  <storm@cua.dk>
+
+        * subr.el (remove-yank-excluded-properties): New helper function.
+        (insert-for-yank, insert-buffer-substring-as-yank): Use it.
+
+        * simple.el (yank-excluded-properties): Added help-echo to list.
+
 2002-04-29  Glenn Morris  <gmorris@ast.cam.ac.uk>
 
         * autoinsert.el (auto-insert-directory): Doc fix. 
diff --git a/lisp/simple.el b/lisp/simple.el
index 09acf9b86ff..ce19c413482 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1901,7 +1901,7 @@ The argument is used for internal purposes; do not supply one."
 
 ;; This is actually used in subr.el but defcustom does not work there.
 (defcustom yank-excluded-properties
-  '(read-only invisible intangible field mouse-face local-map keymap)
+  '(read-only invisible intangible field mouse-face help-echo local-map keymap)
   "*Text properties to discard when yanking."
   :type '(choice (const :tag "All" t) (repeat symbol))
   :group 'editing