From 46be8793650611f8f3dbf1d28a01cd77895c2cc0 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Tue, 30 May 1995 18:39:22 +0000 Subject: [PATCH] (frame-configuration-p): Moved to subr.el. --- lisp/frame.el | 8 -------- 1 file changed, 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. -- 2.39.2