Mercurial > hg > xemacs-beta

comparison src/chartab.c @ 3145:d830788d6a2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-12-18 10:59:12 by aidan] Set the default character class to word, not whitespace
author aidan
date Sun, 18 Dec 2005 10:59:14 +0000
parents facf3239ba30
children f73b455b1472
comparison
equal deleted inserted replaced
3144:febec101135c 3145:d830788d6a2c
598 if (ty == CHAR_TABLE_TYPE_SYNTAX) 598 if (ty == CHAR_TABLE_TYPE_SYNTAX)
599 { 599 {
600 /* Qgeneric not Qsyntax because a syntax table has a mirror table 600 /* Qgeneric not Qsyntax because a syntax table has a mirror table
601 and we don't want infinite recursion */ 601 and we don't want infinite recursion */
602 ct->mirror_table = Fmake_char_table (Qgeneric); 602 ct->mirror_table = Fmake_char_table (Qgeneric);
603 set_char_table_default (ct->mirror_table, make_int (Spunct)); 603 set_char_table_default (ct->mirror_table, make_int (Sword));
604 XCHAR_TABLE (ct->mirror_table)->mirror_table_p = 1; 604 XCHAR_TABLE (ct->mirror_table)->mirror_table_p = 1;
605 XCHAR_TABLE (ct->mirror_table)->mirror_table = obj; 605 XCHAR_TABLE (ct->mirror_table)->mirror_table = obj;
606 } 606 }
607 else 607 else
608 ct->mirror_table = Qnil; 608 ct->mirror_table = Qnil;