unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* Re: display-pixel-height not working as advertized
       [not found] <E16uX2D-0006h6-00@aris>
@ 2002-04-09 12:08 ` Richard Stallman
  2002-04-10 23:27   ` John Paul Wallington
  0 siblings, 1 reply; 3+ messages in thread
From: Richard Stallman @ 2002-04-09 12:08 UTC (permalink / raw)
  Cc: emacs-devel

    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?

^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: display-pixel-height not working as advertized
  2002-04-09 12:08 ` display-pixel-height not working as advertized Richard Stallman
@ 2002-04-10 23:27   ` John Paul Wallington
  2002-04-12  3:12     ` Richard Stallman
  0 siblings, 1 reply; 3+ messages in thread
From: John Paul Wallington @ 2002-04-10 23:27 UTC (permalink / raw)
  Cc: johnw, emacs-devel

Richard Stallman <rms@gnu.org> 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

^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: display-pixel-height not working as advertized
  2002-04-10 23:27   ` John Paul Wallington
@ 2002-04-12  3:12     ` Richard Stallman
  0 siblings, 0 replies; 3+ messages in thread
From: Richard Stallman @ 2002-04-12  3:12 UTC (permalink / raw)
  Cc: johnw, emacs-devel

I think you found the problem and the right fix.
Thanks.

^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2002-04-12  3:12 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
     [not found] <E16uX2D-0006h6-00@aris>
2002-04-09 12:08 ` display-pixel-height not working as advertized Richard Stallman
2002-04-10 23:27   ` John Paul Wallington
2002-04-12  3:12     ` Richard Stallman

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).