[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: display-pixel-height not working as advertized

From: John Paul Wallington
Subject: Re: display-pixel-height not working as advertized
Date: Thu, 11 Apr 2002 00:27:45 +0100

Richard Stallman <address@hidden> wrote:

>     This seems to be because (framep-on-display "some.host.com:0") always
>     returns nil.
> Since the failure is happening on your machine, could you debug why it
> fails?

Should `frames-on-display-list' use equal instead of eq ?

(defun frames-on-display-list (&optional display)
  "Return a list of all frames on DISPLAY.
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)))

John Paul Wallington

reply via email to

[Prev in Thread] Current Thread [Next in Thread]