Mercurial > hg > xemacs-beta

changeset 4727:90dbf8e772b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix typo in font-combine-fonts-internal.
author Stephen J. Turnbull <stephen@xemacs.org>
date Sun, 01 Nov 2009 20:21:11 +0900
parents 4bbda1c11a7b
children d0ea57eb3de4 428d7c571110
files lisp/ChangeLog lisp/font.el
diffstat 2 files changed, 7 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sun Nov 01 16:19:02 2009 +0900
+++ b/lisp/ChangeLog	Sun Nov 01 20:21:11 2009 +0900
@@ -1,3 +1,8 @@
+2009-11-01  Stephen Turnbull  <stephen@xemacs.org>
+
+	* font.el (font-combine-fonts-internal):
+	Fix syntax error in call of delete-duplicates.
+
 2009-11-01  Stephen Turnbull  <stephen@xemacs.org>
 
 	* lisp.el (forward-sexp):
--- a/lisp/font.el	Sun Nov 01 16:19:02 2009 +0900
+++ b/lisp/font.el	Sun Nov 01 20:21:11 2009 +0900
@@ -414,8 +414,8 @@
 						(font-weight fontobj-2)))
     (set-font-family retval
                      (delete-duplicates (append (font-family fontobj-1)
-                                                (font-family fontobj-2)))
-                     :test #'equal)
+                                                (font-family fontobj-2))
+					:test #'equal))
     (set-font-style retval (logior (font-style fontobj-1)
 				   (font-style fontobj-2)))
     (set-font-registry retval (or (font-registry fontobj-1)