summaryrefslogtreecommitdiff
path: root/lisp/frame.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2002-04-12 16:50:17 +0000
committerEli Zaretskii <eliz@gnu.org>2002-04-12 16:50:17 +0000
commit3be4d85e8a871b4b47c4acd212e430e3d7825190 (patch)
tree6bf0803314f14e73cc388df79549db0c87c988b9 /lisp/frame.el
parentf66718b289ef3a7b1fe63663902ea9267fe21434 (diff)
downloademacs-3be4d85e8a871b4b47c4acd212e430e3d7825190.tar.gz
(frames-on-display-list): Use `equal' to compare the
`display' frame parameter to the argument DISPLAY.
Diffstat (limited to 'lisp/frame.el')
-rw-r--r--lisp/frame.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/frame.el b/lisp/frame.el
index 6716f3d2657..1c7ab99cb6d 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -606,7 +606,7 @@ DISPLAY is a name of a display, a string of the form HOST:SERVER.SCREEN.
If DISPLAY is omitted or nil, it defaults to the selected frame's display."
(let* ((display (or display (frame-parameter nil 'display)))
(func #'(lambda (frame)
- (eq (frame-parameter frame 'display) display))))
+ (equal (frame-parameter frame 'display) display))))
(filtered-frame-list func)))
(defun framep-on-display (&optional display)