[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/src ChangeLog nsfont.m
From: |
Adrian Robert |
Subject: |
[Emacs-diffs] emacs/src ChangeLog nsfont.m |
Date: |
Wed, 29 Jul 2009 16:03:14 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Adrian Robert <arobert> 09/07/29 16:03:14
Modified files:
src : ChangeLog nsfont.m
Log message:
* nsfont.m (ns_findfonts): Fix 2009-07-24 change to return only one
element, not a list, for match case.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/src/ChangeLog?cvsroot=emacs&r1=1.7672&r2=1.7673
http://cvs.savannah.gnu.org/viewcvs/emacs/src/nsfont.m?cvsroot=emacs&r1=1.32&r2=1.33
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/src/ChangeLog,v
retrieving revision 1.7672
retrieving revision 1.7673
diff -u -b -r1.7672 -r1.7673
--- ChangeLog 28 Jul 2009 02:09:52 -0000 1.7672
+++ ChangeLog 29 Jul 2009 16:03:12 -0000 1.7673
@@ -1,3 +1,8 @@
+2009-07-29 Adrian Robert <address@hidden>
+
+ * nsfont.m (ns_findfonts): Fix 2009-07-24 change to return only one
+ element, not a list, for match case.
+
2009-07-28 Kenichi Handa <address@hidden>
* font.c (font_parse_xlfd): Check DPI and AVGWIDTH properties more
Index: nsfont.m
===================================================================
RCS file: /sources/emacs/emacs/src/nsfont.m,v
retrieving revision 1.32
retrieving revision 1.33
diff -u -b -r1.32 -r1.33
--- nsfont.m 26 Jul 2009 12:58:57 -0000 1.32
+++ nsfont.m 29 Jul 2009 16:03:14 -0000 1.33
@@ -464,7 +464,7 @@
/* If has non-unicode registry, give up. */
tem = AREF (font_spec, FONT_REGISTRY_INDEX);
if (! NILP (tem) && !EQ (tem, Qiso10646_1) && !EQ (tem, Qunicode_bmp))
- return isMatch ? Fcons (ns_fallback_entity (), list) : Qnil;
+ return isMatch ? ns_fallback_entity () : Qnil;
cFamilies = ns_get_covering_families (ns_get_req_script (font_spec), 0.90);
@@ -483,9 +483,12 @@
if (![cFamilies containsObject:
[desc objectForKey: NSFontFamilyAttribute]])
continue;
- list = Fcons (ns_descriptor_to_entity (desc,
+ tem = ns_descriptor_to_entity (desc,
AREF (font_spec, FONT_EXTRA_INDEX),
- NULL), list);
+ NULL);
+ if (isMatch)
+ return tem;
+ list = Fcons (tem, list);
if (fabs (ns_attribute_fvalue (desc, NSFontSlantTrait)) > 0.05)
foundItal = YES;
}
@@ -503,8 +506,8 @@
}
/* Return something if was a match and nothing found. */
- if (isMatch && XINT (Flength (list)) == 0)
- list = Fcons (ns_fallback_entity (), Qnil);
+ if (isMatch)
+ return ns_fallback_entity ();
if (NSFONT_TRACE)
fprintf (stderr, " Returning %d entities.\n", XINT (Flength (list)));