Mercurial > hg > xemacs-beta

comparison src/buffer.c @ 239:41f2f0e326e9 r20-5b18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b18
author cvs
date Mon, 13 Aug 2007 10:15:48 +0200
parents 262b8bb4a523
children 677f6a0ee643
comparison
equal deleted inserted replaced
238:b5f2e56b938d 239:41f2f0e326e9
683 683
684 return finish_init_buffer (b, name); 684 return finish_init_buffer (b, name);
685 } 685 }
686 #endif /* 0 */ 686 #endif /* 0 */
687 687
688
688 689
689 static void 690 static void
690 reset_buffer_local_variables (struct buffer *b, int first_time) 691 reset_buffer_local_variables (struct buffer *b, int first_time)
691 { 692 {
692 struct buffer *def = XBUFFER (Vbuffer_defaults); 693 struct buffer *def = XBUFFER (Vbuffer_defaults);
702 Qpermanent_local, Qnil)))) \ 703 Qpermanent_local, Qnil)))) \
703 b->slot = def->slot; \ 704 b->slot = def->slot; \
704 } 705 }
705 #include "bufslots.h" 706 #include "bufslots.h"
706 #undef MARKED_SLOT 707 #undef MARKED_SLOT
708 #if 0
709 #define STRING256_P(obj) \
710 (STRINGP (obj) && string_char_length (XSTRING (obj)) == 256)
711 /* If the standard case table has been altered and invalidated,
712 fix up its insides first. */
713 if (!(STRING256_P(Vascii_upcase_table) &&
714 STRING256_P(Vascii_canon_table) &&
715 STRING256_P(Vascii_eqv_table)))
716 {
717 Fset_standard_case_table (Vascii_downcase_table);
718 }
719 b->downcase_table = Vascii_downcase_table;
720 b->upcase_table = Vascii_upcase_table;
721 b->case_canon_table = Vascii_canon_table;
722 b->case_eqv_table = Vascii_eqv_table;
723 #ifdef MULE
724 b->mirror_downcase_table = Vmirror_ascii_downcase_table;
725 b->mirror_upcase_table = Vmirror_ascii_upcase_table;
726 b->mirror_case_canon_table = Vmirror_ascii_canon_table;
727 b->mirror_case_eqv_table = Vmirror_ascii_eqv_table;
728 #endif
729 #endif
707 } 730 }
708 731
709 732
710 /* We split this away from generate-new-buffer, because rename-buffer 733 /* We split this away from generate-new-buffer, because rename-buffer
711 and set-visited-file-name ought to be able to use this to really 734 and set-visited-file-name ought to be able to use this to really