# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 801859162 0
# Node ID 27a219ed150592969749c216586f5b346193dc13
# Parent  e4932082046a28c1172d03a1f7ab72e480f10ed4
(frame-configuration-p): Moved to subr.el.

diff -r e4932082046a -r 27a219ed1505 lisp/frame.el
--- a/lisp/frame.el	Tue May 30 18:31:00 1995 +0000
+++ b/lisp/frame.el	Tue May 30 18:39:22 1995 +0000
@@ -557,14 +557,6 @@
 	;; 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.