Mercurial > emacs
changeset 78186:cc31545ae790
(x-handle-no-bitmap-icon): New function.
author | Jan Djärv <jan.h.d@swipnet.se> |
---|---|
date | Sun, 22 Jul 2007 12:17:05 +0000 |
parents | 428256640056 |
children | 926d0282c9f4 |
files | lisp/term/x-win.el |
diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/term/x-win.el Sun Jul 22 09:02:02 2007 +0000 +++ b/lisp/term/x-win.el Sun Jul 22 12:17:05 2007 +0000 @@ -129,6 +129,9 @@ initial-frame-alist) x-invocation-args (cdr x-invocation-args))))))) +(defun x-handle-no-bitmap-icon (switch) + (setq default-frame-alist (cons '(icon-type) default-frame-alist))) + ;; Make -iconic apply only to the initial frame! (defun x-handle-iconic (switch) (setq initial-frame-alist