diff options
| author | Jim Blandy | 1993-01-14 14:48:57 +0000 |
|---|---|---|
| committer | Jim Blandy | 1993-01-14 14:48:57 +0000 |
| commit | faa3b11db68fc9894d8b69b4408b9543fc4b6ca3 (patch) | |
| tree | 47561abb6f45d66ffcae856bc6edac8788b52177 | |
| parent | 396890d1bd48dc66aef314e6e9006d3de23073d5 (diff) | |
| download | emacs-faa3b11db68fc9894d8b69b4408b9543fc4b6ca3.tar.gz emacs-faa3b11db68fc9894d8b69b4408b9543fc4b6ca3.zip | |
* frame.el (frame-notice-user-settings): Don't try to delete the
initial frame if the user took care of that.
| -rw-r--r-- | lisp/frame.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index d679f136ead..59f87e3f858 100644 --- a/lisp/frame.el +++ b/lisp/frame.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; frame.el --- multi-frame management independent of window systems. | 1 | ;;; frame.el --- multi-frame management independent of window systems. |
| 2 | 2 | ||
| 3 | ;;;; Copyright (C) 1990, 1992 Free Software Foundation, Inc. | 3 | ;;;; Copyright (C) 1990, 1992, 1993 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Maintainer: FSF | 5 | ;; Maintainer: FSF |
| 6 | ;; Keywords: internal | 6 | ;; Keywords: internal |
| @@ -113,7 +113,7 @@ These supercede the values given in default-frame-alist.") | |||
| 113 | ;;; need to see if it should go away or change. Create a text frame | 113 | ;;; need to see if it should go away or change. Create a text frame |
| 114 | ;;; here. | 114 | ;;; here. |
| 115 | (defun frame-notice-user-settings () | 115 | (defun frame-notice-user-settings () |
| 116 | (if frame-initial-frame | 116 | (if (live-frame-p frame-initial-frame) |
| 117 | (progn | 117 | (progn |
| 118 | ;; If the user wants a minibuffer-only frame, we'll have to | 118 | ;; If the user wants a minibuffer-only frame, we'll have to |
| 119 | ;; make a new one; you can't remove or add a root window to/from | 119 | ;; make a new one; you can't remove or add a root window to/from |