aboutsummaryrefslogtreecommitdiffstats
path: root/src/buffer.c
diff options
context:
space:
mode:
authorPaul Eggert2015-02-21 00:26:13 -0800
committerPaul Eggert2015-02-21 00:27:00 -0800
commit3ebf06300b8186feac5e9b436ca263dc908ed886 (patch)
tree65b287f79561cf18bb741b6d890ec0ac4f441121 /src/buffer.c
parent066b17df681fabb40108d719086669957aebbc51 (diff)
downloademacs-3ebf06300b8186feac5e9b436ca263dc908ed886.tar.gz
emacs-3ebf06300b8186feac5e9b436ca263dc908ed886.zip
Prefer 'Qfoo' to 'intern ("foo")'
* buffer.c (syms_of_buffer): * bytecode.c (exec_byte_code): * callint.c (Fcall_interactively): * callproc.c (create_temp_file): * charset.c (define_charset_internal): * coding.c (syms_of_coding): * editfns.c (syms_of_editfns): * emacs.c (main): * fns.c (syms_of_fns): * frame.c (delete_frame, Fframe_parameters): * keyboard.c (syms_of_keyboard): * keymap.c (syms_of_keymap): * minibuf.c (read_minibuf, syms_of_minibuf): * nsfns.m (ns_cursor_type_to_lisp): * textprop.c (syms_of_textprop): * xdisp.c (Fformat_mode_line, syms_of_xdisp): * xfns.c (x_create_tip_frame, Fx_select_font): * xml.c (parse_region): Prefer constants like 'Qfoo' to calls like 'intern ("foo")'. * buffer.c (syms_of_buffer): OK to do (put 'erase-buffer 'disabled t) here now ... (keys_of_buffer): ... instead of here. * ftfont.c (syms_of_ftfont): Move DEFSYM of Qmono from here ... * xfns.c (syms_of_xfns): ... to here, since ftfont.c is more optional than xfns.c.
Diffstat (limited to 'src/buffer.c')
-rw-r--r--src/buffer.c8
1 files changed, 3 insertions, 5 deletions
diff --git a/src/buffer.c b/src/buffer.c
index 67eda3ee89e..371588b3093 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -5408,7 +5408,7 @@ syms_of_buffer (void)
5408 DEFSYM (Qoverwrite_mode, "overwrite-mode"); 5408 DEFSYM (Qoverwrite_mode, "overwrite-mode");
5409 Fput (Qoverwrite_mode, Qchoice, 5409 Fput (Qoverwrite_mode, Qchoice,
5410 list3 (Qnil, intern ("overwrite-mode-textual"), 5410 list3 (Qnil, intern ("overwrite-mode-textual"),
5411 intern ("overwrite-mode-binary"))); 5411 Qoverwrite_mode_binary));
5412 5412
5413 Fput (Qprotected_field, Qerror_conditions, 5413 Fput (Qprotected_field, Qerror_conditions,
5414 listn (CONSTYPE_PURE, 2, Qprotected_field, Qerror)); 5414 listn (CONSTYPE_PURE, 2, Qprotected_field, Qerror));
@@ -6326,6 +6326,8 @@ Functions running this hook are, `get-buffer-create',
6326 defsubr (&Soverlay_get); 6326 defsubr (&Soverlay_get);
6327 defsubr (&Soverlay_put); 6327 defsubr (&Soverlay_put);
6328 defsubr (&Srestore_buffer_modified_p); 6328 defsubr (&Srestore_buffer_modified_p);
6329
6330 Fput (intern_c_string ("erase-buffer"), Qdisabled, Qt);
6329} 6331}
6330 6332
6331void 6333void
@@ -6333,8 +6335,4 @@ keys_of_buffer (void)
6333{ 6335{
6334 initial_define_key (control_x_map, 'b', "switch-to-buffer"); 6336 initial_define_key (control_x_map, 'b', "switch-to-buffer");
6335 initial_define_key (control_x_map, 'k', "kill-buffer"); 6337 initial_define_key (control_x_map, 'k', "kill-buffer");
6336
6337 /* This must not be in syms_of_buffer, because Qdisabled is not
6338 initialized when that function gets called. */
6339 Fput (intern_c_string ("erase-buffer"), Qdisabled, Qt);
6340} 6338}