Mercurial > emacs

changeset 20511:9a051580fa02

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(view-register): Show register type file-query.
author Richard M. Stallman <rms@gnu.org>
date Mon, 22 Dec 1997 21:47:18 +0000
parents d175ee25287e
children 65399b8cd0ad
files lisp/register.el
diffstat 1 files changed, 7 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/register.el	Mon Dec 22 21:33:35 1997 +0000
+++ b/lisp/register.el	Mon Dec 22 21:47:18 1997 +0000
@@ -195,6 +195,13 @@
 	  (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