diff options
| author | Richard M. Stallman | 1993-05-24 22:12:29 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-05-24 22:12:29 +0000 |
| commit | bf77ce530a39c3ec748fa1f85f0544cecd750b0e (patch) | |
| tree | abacb4f0611d97fecc0af42569e003f3afd6cb00 | |
| parent | 9daefb36fa8227ef08527c11709b7986123410ca (diff) | |
| download | emacs-bf77ce530a39c3ec748fa1f85f0544cecd750b0e.tar.gz emacs-bf77ce530a39c3ec748fa1f85f0544cecd750b0e.zip | |
(jump-to-register): Don't fail if frame-configuration-p is unbound.
| -rw-r--r-- | lisp/register.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/register.el b/lisp/register.el index 114f25fa8fd..bae40ee165c 100644 --- a/lisp/register.el +++ b/lisp/register.el | |||
| @@ -84,7 +84,8 @@ Argument is a character, naming the register." | |||
| 84 | (interactive "cJump to register: ") | 84 | (interactive "cJump to register: ") |
| 85 | (let ((val (get-register char))) | 85 | (let ((val (get-register char))) |
| 86 | (cond | 86 | (cond |
| 87 | ((frame-configuration-p val) | 87 | ((and (fboundp 'frame-configuration-p) |
| 88 | (frame-configuration-p val)) | ||
| 88 | (set-frame-configuration val)) | 89 | (set-frame-configuration val)) |
| 89 | ((window-configuration-p val) | 90 | ((window-configuration-p val) |
| 90 | (set-window-configuration val)) | 91 | (set-window-configuration val)) |