Mercurial > hg > xemacs-beta

diff lisp/w3/w3-display.el @ 46:6a22abad6937 r19-15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15
author cvs
date Mon, 13 Aug 2007 08:55:31 +0200
parents 8d2a9b52c682
children
line wrap: on
line diff
--- a/lisp/w3/w3-display.el	Mon Aug 13 08:55:13 2007 +0200
+++ b/lisp/w3/w3-display.el	Mon Aug 13 08:55:31 2007 +0200
@@ -1,7 +1,7 @@
 ;;; w3-display.el --- display engine v99999
 ;; Author: wmperry
-;; Created: 1997/03/26 00:03:00
-;; Version: 1.156
+;; Created: 1997/03/26 15:24:53
+;; Version: 1.157
 ;; Keywords: faces, help, hypermedia
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -78,7 +78,8 @@
   (defmacro w3-get-face-info (info &optional other)
     (let ((var (intern (format "w3-face-%s" info))))
       (` (push (w3-get-style-info (quote (, info)) node
-				  (or (w3-get-attribute (quote (, other)))
+				  (or (cdr-safe (assq (quote (, other))
+						      (nth 1 node)))
 				      (car (, var))))
 	       (, var)))))