aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term
diff options
context:
space:
mode:
authorJuanma Barranquero2003-03-28 17:49:49 +0000
committerJuanma Barranquero2003-03-28 17:49:49 +0000
commitc337cd0a628667997a3f40d7439df8cce968e34d (patch)
tree994bf88d6be6fdb773f8de2645ce2fdb3eeece89 /lisp/term
parentb08b261e8b7aabbc3a7647e620728a6dbe973652 (diff)
downloademacs-c337cd0a628667997a3f40d7439df8cce968e34d.tar.gz
emacs-c337cd0a628667997a3f40d7439df8cce968e34d.zip
(iconify-or-deiconify-frame): Define for compatibility with packages
that use it.
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/mac-win.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index 6b014ddaba3..2b66679e39e 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -172,6 +172,13 @@ Switch to a buffer editing the last file dropped."
172 '(lambda () 172 '(lambda ()
173 (defvar mac-ready-for-drag-n-drop t))) 173 (defvar mac-ready-for-drag-n-drop t)))
174 174
175(defun iconify-or-deiconify-frame ()
176 "Iconify the selected frame, or deiconify if it's currently an icon."
177 (interactive)
178 (if (eq (cdr (assq 'visibility (frame-parameters))) t)
179 (iconify-frame)
180 (make-frame-visible)))
181
175; Define constant values to be set to mac-keyboard-text-encoding 182; Define constant values to be set to mac-keyboard-text-encoding
176(defconst kTextEncodingMacRoman 0) 183(defconst kTextEncodingMacRoman 0)
177(defconst kTextEncodingISOLatin1 513 "0x201") 184(defconst kTextEncodingISOLatin1 513 "0x201")