# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 739816240 0
# Node ID c57aec7e822bc55e486304608d3bda3b13023a82
# Parent  3e6cc11cfe9f06b4ceffd06fe3fdae429bc749e3
(view-register): Handle file name values.

diff -r 3e6cc11cfe9f -r c57aec7e822b lisp/register.el
--- a/lisp/register.el	Fri Jun 11 16:22:03 1993 +0000
+++ b/lisp/register.el	Fri Jun 11 16:30:40 1993 +0000
@@ -1,6 +1,6 @@
 ;;; register.el --- register commands for Emacs.
 
-;; Copyright (C) 1985 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 1993 Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Keywords: internal
@@ -152,6 +152,11 @@
 	 ((frame-configuration-p val)
 	  (princ "a frame configuration."))
 
+	 ((and (consp val) (eq (car val) 'file))
+	  (princ "the file ")
+	  (prin1 (cdr val))
+	  (princ "."))
+
 	 ((consp val)
 	  (princ "the rectangle:\n")
 	  (while val