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

Diff of /emacs/src/charset.c

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

revision 1.125.2.31 by fx, Sun Oct 6 21:15:08 2002 UTC revision 1.125.2.32 by handa, Wed Oct 30 00:38:43 2002 UTC
# Line 2007  usage: (set-charset-priority &rest chars Line 2007  usage: (set-charset-priority &rest chars
2007    arglist[1] = old_list;    arglist[1] = old_list;
2008    Vcharset_ordered_list = Fnconc (2, arglist);    Vcharset_ordered_list = Fnconc (2, arglist);
2009    charset_ordered_list_tick++;    charset_ordered_list_tick++;
2010    
2011      for (old_list = Vcharset_ordered_list, new_head = Qnil;
2012           CONSP (old_list); old_list = XCDR (old_list))
2013        {
2014          if (Fmemq (XCAR (old_list), Viso_2022_charset_list))
2015            new_head = Fcons (XCAR (old_list), new_head);
2016        }
2017      Viso_2022_charset_list = Fnreverse (new_head);
2018    
2019    return Qnil;    return Qnil;
2020  }  }
2021    

Legend:
Removed from v.1.125.2.31  
changed lines
  Added in v.1.125.2.32

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