Commit 4f23d31c authored by Juanma Barranquero's avatar Juanma Barranquero

(describe-register-1): Don't assign to val the value returned by

`remove-list-of-text-properties'.
parent 8f92c555
2002-11-19 Masatake Yamato <jet@gyve.org> (tiny change)
* register.el (describe-register-1): Don't assign to val the value
returned by `remove-list-of-text-properties'.
2002-11-18 Kai Gro,A_(Bjohann <kai.grossjohann@uni-duisburg.de>
* calendar/diary-lib.el (fancy-diary-font-lock-keywords): Grok
......
......@@ -140,7 +140,7 @@ If NUMBER is nil, a decimal number is read from the buffer starting
at point, and point moves to the end of that number.
Interactively, NUMBER is the prefix arg (none means nil)."
(interactive "P\ncNumber to register: ")
(set-register register
(set-register register
(if number
(prefix-numeric-value number)
(if (looking-at "\\s-*-?[0-9]+")
......@@ -227,9 +227,8 @@ 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))
(remove-list-of-text-properties 0 (length val)
yank-excluded-properties val)
(if verbose
(progn
(princ "the text:\n")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment