Minor fix for htmlfontify.el (Bug#6239).

* htmlfontify.el (hfy-face-attr-for-class): Use `append' instead
of `nconc' (Bug#6239).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8fcbf15adabff723024a526249ea0909cc4db307..83388723a23ec6cacca3df199bd1737f13f0be18 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-06-27  Masatake YAMATO  <yamato@redhat.com>
+
+       * htmlfontify.el (hfy-face-attr-for-class): Use `append' instead
+       of `nconc' (Bug#6239).
+
 2010-06-27  Christoph  <cschol2112@googlemail.com>  (tiny change)
 
        * bookmark.el (bookmark-bmenu-2-window)

diff --git a/lisp/htmlfontify.el b/lisp/htmlfontify.el
index b363156c311ce13980d2a5a502af80a511d13bf3..f7a5382e6b827be8b2358863808ea6bd01e74f7b 100644 (file)
--- a/lisp/htmlfontify.el
+++ b/lisp/htmlfontify.el
@@ -959,7 +959,7 @@ See also `hfy-display-class' for details of valid values for CLASS."
                new-spec)))))
     (if (or (memq :inherit face-spec) (eq 'default face))
         face-spec
-      (nconc face-spec (list :inherit 'default))) ))
+      (append face-spec (list :inherit 'default)))))
 
 ;; construct an assoc of (css-tag-name . css-tag-value) pairs
 ;; from a face or assoc of face attributes: