mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-27 15:52:00 -08:00
Code Issues Projects Releases Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
Kenichi Handa 2004-01-18 23:30:38 +00:00
parent 71ea13cb98
commit dedbd91c48
2 changed files with 18 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

17
src/ChangeLog.22
View file

@ -1,3 +1,20 @@
2004-01-18 Kenichi Handa <handa@m17n.org>
* print.c: Include charset.h.
(Vprint_charset_text_property): New variable.
(Qdefault): Extern it.
(PRINT_STRING_NON_CHARSET_FOUND)
(PRINT_STRING_UNSAFE_CHARSET_FOUND): New macros.
(print_check_string_result): New variable.
(print_check_string_charset_prop): New function.
(print_prune_charset_plist): New variable.
(print_prune_string_charset): New function.
(print_object): Call print_prune_string_charset if
Vprint_charset_text_property is not t.
(print_interval): Print nothing if itnerval->plist is nil.
(syms_of_print): Declare Vprint_charset_text_property as a lisp
variable. Init and staticpro print_prune_charset_plist.
2004-01-15 Kenichi Handa <handa@m17n.org>
* fontset.c (new_fontset_from_font_name): Use the specified font

2
src/print.c
View file

@ -2256,7 +2256,7 @@ If the value is t, always print the text property `charset'.
If the value is `default', print the text property `charset' only when
the value is different from what is guessed in the current charset
priorities. */);
priorities. */);
Vprint_charset_text_property = Qdefault;
/* prin1_to_string_buffer initialized in init_buffer_once in buffer.c */