diff options
author | Karl Heuer <kwzh@gnu.org> | 1995-05-30 18:39:22 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1995-05-30 18:39:22 +0000 |
commit | 46be8793650611f8f3dbf1d28a01cd77895c2cc0 (patch) | |
tree | 671b757eb3edef4197eb04cb68d09aed255ece45 /lisp | |
parent | f34eaa2c2fe5b35014705484e26fe43beaaecead (diff) | |
download | emacs-46be8793650611f8f3dbf1d28a01cd77895c2cc0.tar.gz emacs-46be8793650611f8f3dbf1d28a01cd77895c2cc0.tar.bz2 emacs-46be8793650611f8f3dbf1d28a01cd77895c2cc0.zip |
(frame-configuration-p): Moved to subr.el.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/frame.el | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index 4e9fee8ec2a..e1fb765a13b 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -557,14 +557,6 @@ is given and non-nil, the unwanted frames are iconified instead." ;; for where to put it. (mapcar 'iconify-frame frames-to-delete) (mapcar 'delete-frame frames-to-delete)))) - -(defun frame-configuration-p (object) - "Return non-nil if OBJECT seems to be a frame configuration. -Any list whose car is `frame-configuration' is assumed to be a frame -configuration." - (and (consp object) - (eq (car object) 'frame-configuration))) - ;;;; Convenience functions for accessing and interactively changing ;;;; frame parameters. |