diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-12-22 21:47:18 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-12-22 21:47:18 +0000 |
| commit | eab0fb012651fb83c51545dc3902fa98909a7447 (patch) | |
| tree | d27f430051128f8e2540fbd5fa2f32e2aa2da5dd /lisp/register.el | |
| parent | 5c2010f05db343cd12b2c26fc7a63eff82976756 (diff) | |
| download | emacs-eab0fb012651fb83c51545dc3902fa98909a7447.tar.gz | |
(view-register): Show register type file-query.
Diffstat (limited to 'lisp/register.el')
| -rw-r--r-- | lisp/register.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/register.el b/lisp/register.el index eb0aa8107c2..0f9e5df36f5 100644 --- a/lisp/register.el +++ b/lisp/register.el @@ -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 |