From 25d887f06f28098a46c14e849c92ff156ff4e1d4 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sat, 24 May 2003 16:22:20 +0000 Subject: (iconify-or-deiconify-frame): Move to frame.el. --- lisp/term/w32-win.el | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) (limited to 'lisp/term') 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) -- cgit v1.2.1