diff options
| author | Andreas Politz <politza@hochschule-trier.de> | 2019-10-13 05:08:37 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-13 05:08:37 +0200 |
| commit | 4d74b2b9539964758fc433480ad93ce912b6f3db (patch) | |
| tree | c32d35183e982738d9a64ceee5a740b8056a3c33 /lisp/startup.el | |
| parent | e1a4ed67b3cf232c7a05169db32141ca0a682a11 (diff) | |
| download | emacs-4d74b2b9539964758fc433480ad93ce912b6f3db.tar.gz | |
Use quit-window in some functions
* lisp/strokes.el:
* lisp/startup.el (fancy-startup-tail):
* lisp/progmodes/verilog-mode.el (verilog-complete-word)
(verilog-show-completions):
* lisp/progmodes/idlwave.el (idlwave-quit-help): Use `quit-window'
(bug#24213).
Diffstat (limited to 'lisp/startup.el')
| -rw-r--r-- | lisp/startup.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 393d7872560..48b483415a3 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1856,9 +1856,7 @@ a face or button specification." (customize-set-variable 'inhibit-startup-screen t) (customize-mark-to-save 'inhibit-startup-screen) (custom-save-all)) - (let ((w (get-buffer-window "*GNU Emacs*"))) - (and w (not (one-window-p)) (delete-window w))) - (kill-buffer "*GNU Emacs*"))) + (quit-windows-on "*GNU Emacs*" t))) " ") (when (or user-init-file custom-file) (let ((checked (create-image "checked.xpm" |