diff options
| -rw-r--r-- | lisp/register.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/register.el b/lisp/register.el index c93d52c9f9b..98adce7ae86 100644 --- a/lisp/register.el +++ b/lisp/register.el @@ -230,6 +230,9 @@ The Lisp value REGISTER is a character." (princ (car val)))) ((stringp val) + (setq val + (remove-list-of-text-properties 0 (length val) + yank-excluded-properties val)) (if verbose (progn (princ "the text:\n") @@ -253,7 +256,7 @@ Interactively, second arg is non-nil if prefix arg is supplied." ((consp val) (insert-rectangle val)) ((stringp val) - (insert val)) + (insert-for-yank val)) ((numberp val) (princ val (current-buffer))) ((and (markerp val) (marker-position val)) |