mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-22 05:51:11 -07:00
Code Issues Projects Releases Wiki Activity

(view-register): Show register type file-query.

Browse source
This commit is contained in:
Richard M. Stallman 1997-12-22 21:47:18 +00:00
parent 5c2010f05d
commit eab0fb0126
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/register.el
View file

@ -195,6 +195,13 @@ The Lisp value REGISTER is a character."
(prin1 (cdr val))
(princ "."))
((and (consp val) (eq (car val) 'file-query))
(princ "a file-query reference:\nfile ")
(prin1 (car (cdr val)))
(princ ",\nposition ")
(princ (car (cdr (cdr val))))
(princ "."))
((consp val)
(princ "the rectangle:\n")
(while val