/[emacs]/emacs/src/intervals.c
ViewVC logotype

Diff of /emacs/src/intervals.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.114.2.2 by miles, Tue Oct 14 23:16:47 2003 UTC revision 1.114.2.3 by miles, Tue Jul 6 09:23:54 2004 UTC
# Line 1899  lookup_char_property (plist, prop, textp Line 1899  lookup_char_property (plist, prop, textp
1899      return fallback;      return fallback;
1900    /* Check for alternative properties */    /* Check for alternative properties */
1901    tail = Fassq (prop, Vchar_property_alias_alist);    tail = Fassq (prop, Vchar_property_alias_alist);
1902    if (NILP (tail))    if (! NILP (tail))
1903      return tail;      {
1904    tail = XCDR (tail);        tail = XCDR (tail);
1905    for (; NILP (fallback) && CONSP (tail); tail = XCDR (tail))        for (; NILP (fallback) && CONSP (tail); tail = XCDR (tail))
1906      fallback = Fplist_get (plist, XCAR (tail));          fallback = Fplist_get (plist, XCAR (tail));
1907        }
1908    
1909    if (textprop && NILP (fallback) && CONSP (Vdefault_text_properties))    if (textprop && NILP (fallback) && CONSP (Vdefault_text_properties))
1910      fallback = Fplist_get (Vdefault_text_properties, prop);      fallback = Fplist_get (Vdefault_text_properties, prop);
1911    return fallback;    return fallback;

Legend:
Removed from v.1.114.2.2  
changed lines
  Added in v.1.114.2.3

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26