changeset 3039:7520bbbe9100

(jump-to-register): Don't fail if frame-configuration-p is unbound.
author Richard M. Stallman <rms@gnu.org>
date Mon, 24 May 1993 22:12:29 +0000
parents 4bdac10d920a
children aa7dcfbfa478
files lisp/register.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/register.el	Mon May 24 21:45:20 1993 +0000
+++ b/lisp/register.el	Mon May 24 22:12:29 1993 +0000
@@ -84,7 +84,8 @@
   (interactive "cJump to register: ")
   (let ((val (get-register char)))
     (cond
-     ((frame-configuration-p val)
+     ((and (fboundp 'frame-configuration-p)
+	   (frame-configuration-p val))
       (set-frame-configuration val))
      ((window-configuration-p val)
       (set-window-configuration val))