Mercurial > hg > xemacs-beta

comparison src/buffer.c @ 120:cca96a509cfe r20-1b12

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b12
author cvs
date Mon, 13 Aug 2007 09:25:29 +0200
parents 9f59509498e1
children 585fb297b004
comparison
equal deleted inserted replaced
119:d101af7320b8 120:cca96a509cfe
459 FILENAME will be converted to its truename and used for searching, but 459 FILENAME will be converted to its truename and used for searching, but
460 the search will still be done on `buffer-file-name'. 460 the search will still be done on `buffer-file-name'.
461 */ 461 */
462 (filename)) 462 (filename))
463 { 463 {
464 /* This function can GC */ 464 /* This function can GC. GC checked 1997.04.06. */
465 REGISTER Lisp_Object tail, buf, tem; 465 REGISTER Lisp_Object tail, buf, tem;
466 struct gcpro gcpro1; 466 struct gcpro gcpro1;
467 467
468 #ifdef I18N3 468 #ifdef I18N3
469 /* DO NOT translate the filename. */ 469 /* DO NOT translate the filename. */
1241 if (EQ (buf, Vminibuffer_zero)) 1241 if (EQ (buf, Vminibuffer_zero))
1242 return Qnil; 1242 return Qnil;
1243 1243
1244 /* Or the echo area. */ 1244 /* Or the echo area. */
1245 if (EQ (buf, Vecho_area_buffer)) 1245 if (EQ (buf, Vecho_area_buffer))
1246 return Qnil;
1247
1248 /* Or the special invisible internal prin1 buffer. */
1249 if (EQ (buf, Vprin1_to_string_buffer))
1246 return Qnil; 1250 return Qnil;
1247 1251
1248 /* Query if the buffer is still modified. */ 1252 /* Query if the buffer is still modified. */
1249 if (INTERACTIVE && !NILP (b->filename) 1253 if (INTERACTIVE && !NILP (b->filename)
1250 && BUF_MODIFF (b) > BUF_SAVE_MODIFF (b)) 1254 && BUF_MODIFF (b) > BUF_SAVE_MODIFF (b))
2510 See `buffer-file-coding-system'. 2514 See `buffer-file-coding-system'.
2511 */ ); 2515 */ );
2512 2516
2513 DEFVAR_BUFFER_LOCAL ("buffer-file-coding-system", buffer_file_coding_system /* 2517 DEFVAR_BUFFER_LOCAL ("buffer-file-coding-system", buffer_file_coding_system /*
2514 *Current coding system for the current buffer. 2518 *Current coding system for the current buffer.
2515 When the buffer is written out into a file, this coding system will 2519 When the buffer is written out into a file, this coding system will be
2516 be used for the encoding. Automatically buffer-local when set in 2520 used for the encoding. Automatically buffer-local when set in any
2517 any fashion. This is normally set automatically when a file is loaded 2521 fashion. This is normally set automatically when a file is loaded in
2518 in based on the determined coding system of the file (assuming that 2522 based on the determined coding system of the file (assuming that
2519 `buffer-file-coding-system-for-read' is set to `autodetect', which calls 2523 `buffer-file-coding-system-for-read' is set to `automatic-conversion',
2520 for automatic determination of the file's coding system). Normally the 2524 which calls for automatic determination of the file's coding system).
2521 modeline indicates the current file coding system using its mnemonic 2525 Normally the modeline indicates the current file coding system using
2522 abbreviation. 2526 its mnemonic abbreviation.
2523 2527
2524 The default value for this variable (which is normally used for 2528 The default value for this variable (which is normally used for
2525 buffers without associated files) is also used when automatic 2529 buffers without associated files) is also used when automatic
2526 detection of a file's encoding is called for and there was no 2530 detection of a file's encoding is called for and there was no
2527 discernable encoding in the file (i.e. it was entirely or almost 2531 discernable encoding in the file (i.e. it was entirely or almost