changeset: 4589:03ec57ae1d1e2a18aa57a0feceff2caa64dbe636
tag: tip
parent: 4588:6a6689b96f00c887a1ede549a873f6f6f334b29b
parent: 4585:b25f081370e0ea07648c447823f1b97e3d45b33b
user: Stephen J. Turnbull <stephen(a)xemacs.org>
date: Sat Jan 31 22:47:43 2009 +0900
files:
description:
YAFMT
diff -r 6a6689b96f00c887a1ede549a873f6f6f334b29b -r
03ec57ae1d1e2a18aa57a0feceff2caa64dbe636 lisp/ChangeLog
--- a/lisp/ChangeLog Sat Jan 31 22:25:16 2009 +0900
+++ b/lisp/ChangeLog Sat Jan 31 22:47:43 2009 +0900
@@ -1,3 +1,9 @@ 2009-01-18 Ville Skyttä <scop(a)xemacs.o
+2009-01-31 Aidan Kehoe <kehoea(a)parhasard.net>
+
+ * frame.el (display-graphic-p):
+ Call #'display-device on the DISPLAY argument, ensuring that the
+ argument to #'device-on-window-system-p is correct.
+
2009-01-18 Ville Skyttä <scop(a)xemacs.org>
* font.el (font-*-p): Docstring spelling fix.
diff -r 6a6689b96f00c887a1ede549a873f6f6f334b29b -r
03ec57ae1d1e2a18aa57a0feceff2caa64dbe636 lisp/frame.el
--- a/lisp/frame.el Sat Jan 31 22:25:16 2009 +0900
+++ b/lisp/frame.el Sat Jan 31 22:47:43 2009 +0900
@@ -1211,7 +1211,7 @@ that use a window system such as X, and
that use a window system such as X, and false for text-only terminals.
DISPLAY can be a frame, a device, a console, or nil (meaning the selected
frame)."
- (device-on-window-system-p display))
+ (device-on-window-system-p (display-device display)))
(defun display-images-p (&optional display)
"Return non-nil if DISPLAY can display images.
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches