Mercurial > emacs
changeset 89718:75a2373c03cc
*** empty log message ***
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Sun, 18 Jan 2004 23:30:38 +0000 |
| parents | 2e9328140e82 |
| children | d91b7816539c |
| files | src/ChangeLog.22 src/print.c |
| diffstat | 2 files changed, 18 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog.22 Sun Jan 18 23:27:07 2004 +0000 +++ b/src/ChangeLog.22 Sun Jan 18 23:30:38 2004 +0000 @@ -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
--- a/src/print.c Sun Jan 18 23:27:07 2004 +0000 +++ b/src/print.c Sun Jan 18 23:30:38 2004 +0000 @@ -2256,7 +2256,7 @@ 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 */