diff options
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 58 |
1 files changed, 29 insertions, 29 deletions
diff --git a/src/buffer.c b/src/buffer.c index 2fc7a8b3a7c..5359c7cf69c 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -5162,7 +5162,7 @@ init_buffer_once () | |||
| 5162 | /* Must do these before making the first buffer! */ | 5162 | /* Must do these before making the first buffer! */ |
| 5163 | 5163 | ||
| 5164 | /* real setup is done in bindings.el */ | 5164 | /* real setup is done in bindings.el */ |
| 5165 | buffer_defaults.mode_line_format = build_string ("%-"); | 5165 | buffer_defaults.mode_line_format = make_pure_c_string ("%-"); |
| 5166 | buffer_defaults.header_line_format = Qnil; | 5166 | buffer_defaults.header_line_format = Qnil; |
| 5167 | buffer_defaults.abbrev_mode = Qnil; | 5167 | buffer_defaults.abbrev_mode = Qnil; |
| 5168 | buffer_defaults.overwrite_mode = Qnil; | 5168 | buffer_defaults.overwrite_mode = Qnil; |
| @@ -5304,25 +5304,25 @@ init_buffer_once () | |||
| 5304 | 5304 | ||
| 5305 | QSFundamental = build_string ("Fundamental"); | 5305 | QSFundamental = build_string ("Fundamental"); |
| 5306 | 5306 | ||
| 5307 | Qfundamental_mode = intern ("fundamental-mode"); | 5307 | Qfundamental_mode = intern_c_string ("fundamental-mode"); |
| 5308 | buffer_defaults.major_mode = Qfundamental_mode; | 5308 | buffer_defaults.major_mode = Qfundamental_mode; |
| 5309 | 5309 | ||
| 5310 | Qmode_class = intern ("mode-class"); | 5310 | Qmode_class = intern_c_string ("mode-class"); |
| 5311 | 5311 | ||
| 5312 | Qprotected_field = intern ("protected-field"); | 5312 | Qprotected_field = intern_c_string ("protected-field"); |
| 5313 | 5313 | ||
| 5314 | Qpermanent_local = intern ("permanent-local"); | 5314 | Qpermanent_local = intern_c_string ("permanent-local"); |
| 5315 | 5315 | ||
| 5316 | Qkill_buffer_hook = intern ("kill-buffer-hook"); | 5316 | Qkill_buffer_hook = intern_c_string ("kill-buffer-hook"); |
| 5317 | Fput (Qkill_buffer_hook, Qpermanent_local, Qt); | 5317 | Fput (Qkill_buffer_hook, Qpermanent_local, Qt); |
| 5318 | 5318 | ||
| 5319 | Qucs_set_table_for_input = intern ("ucs-set-table-for-input"); | 5319 | Qucs_set_table_for_input = intern_c_string ("ucs-set-table-for-input"); |
| 5320 | 5320 | ||
| 5321 | /* super-magic invisible buffer */ | 5321 | /* super-magic invisible buffer */ |
| 5322 | Vprin1_to_string_buffer = Fget_buffer_create (build_string (" prin1")); | 5322 | Vprin1_to_string_buffer = Fget_buffer_create (make_pure_c_string (" prin1")); |
| 5323 | Vbuffer_alist = Qnil; | 5323 | Vbuffer_alist = Qnil; |
| 5324 | 5324 | ||
| 5325 | Fset_buffer (Fget_buffer_create (build_string ("*scratch*"))); | 5325 | Fset_buffer (Fget_buffer_create (make_pure_c_string ("*scratch*"))); |
| 5326 | 5326 | ||
| 5327 | inhibit_modification_hooks = 0; | 5327 | inhibit_modification_hooks = 0; |
| 5328 | } | 5328 | } |
| @@ -5451,45 +5451,45 @@ syms_of_buffer () | |||
| 5451 | staticpro (&Vbuffer_alist); | 5451 | staticpro (&Vbuffer_alist); |
| 5452 | staticpro (&Qprotected_field); | 5452 | staticpro (&Qprotected_field); |
| 5453 | staticpro (&Qpermanent_local); | 5453 | staticpro (&Qpermanent_local); |
| 5454 | Qpermanent_local_hook = intern ("permanent-local-hook"); | 5454 | Qpermanent_local_hook = intern_c_string ("permanent-local-hook"); |
| 5455 | staticpro (&Qpermanent_local_hook); | 5455 | staticpro (&Qpermanent_local_hook); |
| 5456 | staticpro (&Qkill_buffer_hook); | 5456 | staticpro (&Qkill_buffer_hook); |
| 5457 | Qoverlayp = intern ("overlayp"); | 5457 | Qoverlayp = intern_c_string ("overlayp"); |
| 5458 | staticpro (&Qoverlayp); | 5458 | staticpro (&Qoverlayp); |
| 5459 | Qevaporate = intern ("evaporate"); | 5459 | Qevaporate = intern_c_string ("evaporate"); |
| 5460 | staticpro (&Qevaporate); | 5460 | staticpro (&Qevaporate); |
| 5461 | Qmodification_hooks = intern ("modification-hooks"); | 5461 | Qmodification_hooks = intern_c_string ("modification-hooks"); |
| 5462 | staticpro (&Qmodification_hooks); | 5462 | staticpro (&Qmodification_hooks); |
| 5463 | Qinsert_in_front_hooks = intern ("insert-in-front-hooks"); | 5463 | Qinsert_in_front_hooks = intern_c_string ("insert-in-front-hooks"); |
| 5464 | staticpro (&Qinsert_in_front_hooks); | 5464 | staticpro (&Qinsert_in_front_hooks); |
| 5465 | Qinsert_behind_hooks = intern ("insert-behind-hooks"); | 5465 | Qinsert_behind_hooks = intern_c_string ("insert-behind-hooks"); |
| 5466 | staticpro (&Qinsert_behind_hooks); | 5466 | staticpro (&Qinsert_behind_hooks); |
| 5467 | Qget_file_buffer = intern ("get-file-buffer"); | 5467 | Qget_file_buffer = intern_c_string ("get-file-buffer"); |
| 5468 | staticpro (&Qget_file_buffer); | 5468 | staticpro (&Qget_file_buffer); |
| 5469 | Qpriority = intern ("priority"); | 5469 | Qpriority = intern_c_string ("priority"); |
| 5470 | staticpro (&Qpriority); | 5470 | staticpro (&Qpriority); |
| 5471 | Qwindow = intern ("window"); | 5471 | Qwindow = intern_c_string ("window"); |
| 5472 | staticpro (&Qwindow); | 5472 | staticpro (&Qwindow); |
| 5473 | Qbefore_string = intern ("before-string"); | 5473 | Qbefore_string = intern_c_string ("before-string"); |
| 5474 | staticpro (&Qbefore_string); | 5474 | staticpro (&Qbefore_string); |
| 5475 | Qafter_string = intern ("after-string"); | 5475 | Qafter_string = intern_c_string ("after-string"); |
| 5476 | staticpro (&Qafter_string); | 5476 | staticpro (&Qafter_string); |
| 5477 | Qfirst_change_hook = intern ("first-change-hook"); | 5477 | Qfirst_change_hook = intern_c_string ("first-change-hook"); |
| 5478 | staticpro (&Qfirst_change_hook); | 5478 | staticpro (&Qfirst_change_hook); |
| 5479 | Qbefore_change_functions = intern ("before-change-functions"); | 5479 | Qbefore_change_functions = intern_c_string ("before-change-functions"); |
| 5480 | staticpro (&Qbefore_change_functions); | 5480 | staticpro (&Qbefore_change_functions); |
| 5481 | Qafter_change_functions = intern ("after-change-functions"); | 5481 | Qafter_change_functions = intern_c_string ("after-change-functions"); |
| 5482 | staticpro (&Qafter_change_functions); | 5482 | staticpro (&Qafter_change_functions); |
| 5483 | /* The next one is initialized in init_buffer_once. */ | 5483 | /* The next one is initialized in init_buffer_once. */ |
| 5484 | staticpro (&Qucs_set_table_for_input); | 5484 | staticpro (&Qucs_set_table_for_input); |
| 5485 | 5485 | ||
| 5486 | Qkill_buffer_query_functions = intern ("kill-buffer-query-functions"); | 5486 | Qkill_buffer_query_functions = intern_c_string ("kill-buffer-query-functions"); |
| 5487 | staticpro (&Qkill_buffer_query_functions); | 5487 | staticpro (&Qkill_buffer_query_functions); |
| 5488 | 5488 | ||
| 5489 | Fput (Qprotected_field, Qerror_conditions, | 5489 | Fput (Qprotected_field, Qerror_conditions, |
| 5490 | Fcons (Qprotected_field, Fcons (Qerror, Qnil))); | 5490 | pure_cons (Qprotected_field, pure_cons (Qerror, Qnil))); |
| 5491 | Fput (Qprotected_field, Qerror_message, | 5491 | Fput (Qprotected_field, Qerror_message, |
| 5492 | build_string ("Attempt to modify a protected field")); | 5492 | make_pure_c_string ("Attempt to modify a protected field")); |
| 5493 | 5493 | ||
| 5494 | /* All these use DEFVAR_LISP_NOPRO because the slots in | 5494 | /* All these use DEFVAR_LISP_NOPRO because the slots in |
| 5495 | buffer_defaults will all be marked via Vbuffer_defaults. */ | 5495 | buffer_defaults will all be marked via Vbuffer_defaults. */ |
| @@ -5769,7 +5769,7 @@ use the function `set-buffer-multibyte' to change a buffer's representation. | |||
| 5769 | Changing its default value with `setq-default' is supported. | 5769 | Changing its default value with `setq-default' is supported. |
| 5770 | See also variable `default-enable-multibyte-characters' and Info node | 5770 | See also variable `default-enable-multibyte-characters' and Info node |
| 5771 | `(elisp)Text Representations'. */); | 5771 | `(elisp)Text Representations'. */); |
| 5772 | XSYMBOL (intern ("enable-multibyte-characters"))->constant = 1; | 5772 | XSYMBOL (intern_c_string ("enable-multibyte-characters"))->constant = 1; |
| 5773 | 5773 | ||
| 5774 | DEFVAR_PER_BUFFER ("buffer-file-coding-system", | 5774 | DEFVAR_PER_BUFFER ("buffer-file-coding-system", |
| 5775 | ¤t_buffer->buffer_file_coding_system, Qnil, | 5775 | ¤t_buffer->buffer_file_coding_system, Qnil, |
| @@ -6278,7 +6278,7 @@ If any of them returns nil, the buffer is not killed. */); | |||
| 6278 | doc: /* Normal hook run before changing the major mode of a buffer. | 6278 | doc: /* Normal hook run before changing the major mode of a buffer. |
| 6279 | The function `kill-all-local-variables' runs this before doing anything else. */); | 6279 | The function `kill-all-local-variables' runs this before doing anything else. */); |
| 6280 | Vchange_major_mode_hook = Qnil; | 6280 | Vchange_major_mode_hook = Qnil; |
| 6281 | Qchange_major_mode_hook = intern ("change-major-mode-hook"); | 6281 | Qchange_major_mode_hook = intern_c_string ("change-major-mode-hook"); |
| 6282 | staticpro (&Qchange_major_mode_hook); | 6282 | staticpro (&Qchange_major_mode_hook); |
| 6283 | 6283 | ||
| 6284 | defsubr (&Sbuffer_live_p); | 6284 | defsubr (&Sbuffer_live_p); |
| @@ -6340,7 +6340,7 @@ keys_of_buffer () | |||
| 6340 | 6340 | ||
| 6341 | /* This must not be in syms_of_buffer, because Qdisabled is not | 6341 | /* This must not be in syms_of_buffer, because Qdisabled is not |
| 6342 | initialized when that function gets called. */ | 6342 | initialized when that function gets called. */ |
| 6343 | Fput (intern ("erase-buffer"), Qdisabled, Qt); | 6343 | Fput (intern_c_string ("erase-buffer"), Qdisabled, Qt); |
| 6344 | } | 6344 | } |
| 6345 | 6345 | ||
| 6346 | /* arch-tag: e48569bf-69a9-4b65-a23b-8e68769436e1 | 6346 | /* arch-tag: e48569bf-69a9-4b65-a23b-8e68769436e1 |