diff options
| author | Dmitry Antipov | 2012-07-12 07:45:46 +0400 |
|---|---|---|
| committer | Dmitry Antipov | 2012-07-12 07:45:46 +0400 |
| commit | 4a7edc24ba4da27f44151df4e4541c86c35d3037 (patch) | |
| tree | 12ec51444ac8e10c3e62f59d1db1da32c3eef3e0 | |
| parent | 42bd17194ca4b88032fb8b74aaf33b94b4353703 (diff) | |
| download | emacs-4a7edc24ba4da27f44151df4e4541c86c35d3037.tar.gz emacs-4a7edc24ba4da27f44151df4e4541c86c35d3037.zip | |
Use empty_unibyte_string where applicable.
* keyboard.c (parse_tool_bar_item): Use empty_unibyte_string.
* lread.c (read1): Likewise.
* xsettings.c (syms_of_xsettings): Likewise.
| -rw-r--r-- | src/ChangeLog | 7 | ||||
| -rw-r--r-- | src/keyboard.c | 2 | ||||
| -rw-r--r-- | src/lread.c | 4 | ||||
| -rw-r--r-- | src/xsettings.c | 2 |
4 files changed, 11 insertions, 4 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 52e9364f6ea..7b6eaa3820a 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2012-07-12 Dmitry Antipov <dmantipov@yandex.ru> | ||
| 2 | |||
| 3 | Use empty_unibyte_string where applicable. | ||
| 4 | * keyboard.c (parse_tool_bar_item): Use empty_unibyte_string. | ||
| 5 | * lread.c (read1): Likewise. | ||
| 6 | * xsettings.c (syms_of_xsettings): Likewise. | ||
| 7 | |||
| 1 | 2012-07-12 Glenn Morris <rgm@gnu.org> | 8 | 2012-07-12 Glenn Morris <rgm@gnu.org> |
| 2 | 9 | ||
| 3 | * s/cygwin.h (G_SLICE_ALWAYS_MALLOC): | 10 | * s/cygwin.h (G_SLICE_ALWAYS_MALLOC): |
diff --git a/src/keyboard.c b/src/keyboard.c index 1ef4ac84d0c..963f40a2e32 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -8331,7 +8331,7 @@ parse_tool_bar_item (Lisp_Object key, Lisp_Object item) | |||
| 8331 | if (SCHARS (new_lbl) <= tool_bar_max_label_size) | 8331 | if (SCHARS (new_lbl) <= tool_bar_max_label_size) |
| 8332 | PROP (TOOL_BAR_ITEM_LABEL) = new_lbl; | 8332 | PROP (TOOL_BAR_ITEM_LABEL) = new_lbl; |
| 8333 | else | 8333 | else |
| 8334 | PROP (TOOL_BAR_ITEM_LABEL) = make_string ("", 0); | 8334 | PROP (TOOL_BAR_ITEM_LABEL) = empty_unibyte_string; |
| 8335 | xfree (buf); | 8335 | xfree (buf); |
| 8336 | } | 8336 | } |
| 8337 | 8337 | ||
diff --git a/src/lread.c b/src/lread.c index d8a0275bee7..39378bb11dd 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -2670,13 +2670,13 @@ read1 (register Lisp_Object readcharfun, int *pch, int first_in_list) | |||
| 2670 | /* No symbol character follows, this is the empty | 2670 | /* No symbol character follows, this is the empty |
| 2671 | symbol. */ | 2671 | symbol. */ |
| 2672 | UNREAD (c); | 2672 | UNREAD (c); |
| 2673 | return Fmake_symbol (build_string ("")); | 2673 | return Fmake_symbol (empty_unibyte_string); |
| 2674 | } | 2674 | } |
| 2675 | goto read_symbol; | 2675 | goto read_symbol; |
| 2676 | } | 2676 | } |
| 2677 | /* ## is the empty symbol. */ | 2677 | /* ## is the empty symbol. */ |
| 2678 | if (c == '#') | 2678 | if (c == '#') |
| 2679 | return Fintern (build_string (""), Qnil); | 2679 | return Fintern (empty_unibyte_string, Qnil); |
| 2680 | /* Reader forms that can reuse previously read objects. */ | 2680 | /* Reader forms that can reuse previously read objects. */ |
| 2681 | if (c >= '0' && c <= '9') | 2681 | if (c >= '0' && c <= '9') |
| 2682 | { | 2682 | { |
diff --git a/src/xsettings.c b/src/xsettings.c index 6f7b81cbe87..a28d75d9422 100644 --- a/src/xsettings.c +++ b/src/xsettings.c | |||
| @@ -1035,7 +1035,7 @@ If this variable is nil, Emacs ignores system font changes. */); | |||
| 1035 | 1035 | ||
| 1036 | DEFVAR_LISP ("xft-settings", Vxft_settings, | 1036 | DEFVAR_LISP ("xft-settings", Vxft_settings, |
| 1037 | doc: /* Font settings applied to Xft. */); | 1037 | doc: /* Font settings applied to Xft. */); |
| 1038 | Vxft_settings = make_string ("", 0); | 1038 | Vxft_settings = empty_unibyte_string; |
| 1039 | 1039 | ||
| 1040 | #ifdef HAVE_XFT | 1040 | #ifdef HAVE_XFT |
| 1041 | Fprovide (intern_c_string ("font-render-setting"), Qnil); | 1041 | Fprovide (intern_c_string ("font-render-setting"), Qnil); |