diff options
| author | Dmitry Antipov <dmantipov@yandex.ru> | 2014-09-16 12:20:08 +0400 |
|---|---|---|
| committer | Dmitry Antipov <dmantipov@yandex.ru> | 2014-09-16 12:20:08 +0400 |
| commit | b98b1a831bcfc89f038cbb8048c6969d8c73ab28 (patch) | |
| tree | aaefabe0ced95ba3b34e59ed78d452d4036d99e5 /src/xfns.c | |
| parent | 3a41eb66c104adbbc9040b817eee76a5aedd5d16 (diff) | |
| download | emacs-b98b1a831bcfc89f038cbb8048c6969d8c73ab28.tar.gz | |
If USE_LOCAL_ALLOCATORS, allocate even more Lisp objects on stack.
* charset.c (load_charset_map_from_file): Use scoped_list2
and build_local_string.
* buffer.c (Fother_buffer, other_buffer_safely, init_buffer):
* emacs.c (init_cmdargs, decode_env_path):
* fileio.c (Fexpand_file_name):
* fns.c (maybe_resize_hash_table) [ENABLE_CHECKING]:
* frame.c (x_get_arg):
* keyboard.c (safe_run_hooks_error):
* lread.c (load_warn_old_style_backquotes):
* xdisp.c (Fcurrent_bidi_paragraph_direction):
* xfns.c (x_default_scroll_bar_color_parameter, select_visual):
* xselect.c (x_clipboard_manager_error_1)
(x_clipboard_manager_save_all):
* xterm.c (x_term_init): Use build_local_string.
Diffstat (limited to 'src/xfns.c')
| -rw-r--r-- | src/xfns.c | 23 |
1 files changed, 11 insertions, 12 deletions
diff --git a/src/xfns.c b/src/xfns.c index ec915a69f80..683adb2b210 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -1571,13 +1571,13 @@ x_default_scroll_bar_color_parameter (struct frame *f, /* See if an X resource for the scroll bar color has been specified. */ - tem = display_x_get_resource (dpyinfo, - build_string (foreground_p - ? "foreground" - : "background"), - empty_unibyte_string, - build_string ("verticalScrollBar"), - empty_unibyte_string); + tem = display_x_get_resource + (dpyinfo, build_local_string (foreground_p + ? "foreground" + : "background"), + empty_unibyte_string, + build_local_string ("verticalScrollBar"), + empty_unibyte_string); if (!STRINGP (tem)) { /* If nothing has been specified, scroll bars will use a @@ -4273,13 +4273,12 @@ select_visual (struct x_display_info *dpyinfo) { Display *dpy = dpyinfo->display; Screen *screen = dpyinfo->screen; - Lisp_Object value; /* See if a visual is specified. */ - value = display_x_get_resource (dpyinfo, - build_string ("visualClass"), - build_string ("VisualClass"), - Qnil, Qnil); + Lisp_Object value = display_x_get_resource + (dpyinfo, build_local_string ("visualClass"), + build_local_string ("VisualClass"), Qnil, Qnil); + if (STRINGP (value)) { /* VALUE should be of the form CLASS-DEPTH, where CLASS is one |