Commit 4809d0dd authored by Karl Heuer's avatar Karl Heuer
Browse files

(frame-configuration-p): Moved here from frame.el.

parent 46be8793
......@@ -931,6 +931,15 @@ KEY is a string representing a sequence of keystrokes."
(local-set-key key nil))
nil)
;; We put this here instead of in frame.el so that it's defined even on
;; systems where frame.el isn't loaded.
(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)))
;; now in fns.c
;(defun nth (n list)
; "Returns the Nth element of LIST.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment