From 3f235d5d30e920586915fd621ce50b62f37ffdba Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20Dj=C3=A4rv?= Date: Sun, 22 Jul 2007 12:17:05 +0000 Subject: [PATCH] (x-handle-no-bitmap-icon): New function. --- lisp/term/x-win.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index e48d97d6d1b..d0489844d76 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -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 -- 2.39.5