diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-24 16:22:20 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-24 16:22:20 +0000 |
| commit | 25d887f06f28098a46c14e849c92ff156ff4e1d4 (patch) | |
| tree | 9deb7b5de1a227c63f09114c397a498c5044668b | |
| parent | 2a89019f012bdb0995c1d6fb5b1d103737c3167b (diff) | |
| download | emacs-25d887f06f28098a46c14e849c92ff156ff4e1d4.tar.gz | |
(iconify-or-deiconify-frame): Move to frame.el.
| -rw-r--r-- | lisp/term/w32-win.el | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 565f9a6b5b5..923f3f5ea14 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el @@ -1,6 +1,6 @@ ;;; w32-win.el --- parse switches controlling interface with W32 window system -;; Copyright (C) 1993, 1994 Free Software Foundation, Inc. +;; Copyright (C) 1993, 1994, 2003 Free Software Foundation, Inc. ;; Author: Kevin Gallo ;; Keywords: terminals @@ -1066,13 +1066,6 @@ XConsortium: rgb.txt,v 10.41 94/02/20 18:39:36 rws Exp") (global-set-key [f10] (lambda () (interactive) (w32-send-sys-command ?\xf100))) -(defun iconify-or-deiconify-frame () - "Iconify the selected frame, or deiconify if it's currently an icon." - (interactive) - (if (eq (cdr (assq 'visibility (frame-parameters))) t) - (iconify-frame) - (make-frame-visible))) - (substitute-key-definition 'suspend-emacs 'iconify-or-deiconify-frame global-map) |