diff options
| author | Jan Djärv | 2007-07-22 12:17:05 +0000 |
|---|---|---|
| committer | Jan Djärv | 2007-07-22 12:17:05 +0000 |
| commit | 3f235d5d30e920586915fd621ce50b62f37ffdba (patch) | |
| tree | 3b3fe725ce7aaa96c0f8902c038a9ee3f3e85c40 | |
| parent | a0f55a1df2268d4639fd80ef1fab11f355bb7f5c (diff) | |
| download | emacs-3f235d5d30e920586915fd621ce50b62f37ffdba.tar.gz emacs-3f235d5d30e920586915fd621ce50b62f37ffdba.zip | |
(x-handle-no-bitmap-icon): New function.
| -rw-r--r-- | lisp/term/x-win.el | 3 |
1 files changed, 3 insertions, 0 deletions
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 @@ | |||
| 129 | initial-frame-alist) | 129 | initial-frame-alist) |
| 130 | x-invocation-args (cdr x-invocation-args))))))) | 130 | x-invocation-args (cdr x-invocation-args))))))) |
| 131 | 131 | ||
| 132 | (defun x-handle-no-bitmap-icon (switch) | ||
| 133 | (setq default-frame-alist (cons '(icon-type) default-frame-alist))) | ||
| 134 | |||
| 132 | ;; Make -iconic apply only to the initial frame! | 135 | ;; Make -iconic apply only to the initial frame! |
| 133 | (defun x-handle-iconic (switch) | 136 | (defun x-handle-iconic (switch) |
| 134 | (setq initial-frame-alist | 137 | (setq initial-frame-alist |