Mercurial > hg > xemacs-beta

comparison src/buffer.c @ 110:fe104dbd9147 r20-1b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b7
author cvs
date Mon, 13 Aug 2007 09:19:45 +0200
parents 360340f9fd5f
children 8619ce7e4c50
comparison
equal deleted inserted replaced
109:e183fc049578 110:fe104dbd9147
1000 /* This is often called when the buffer contents are altered but we 1000 /* This is often called when the buffer contents are altered but we
1001 don't want to treat the changes that way (e.g. selective 1001 don't want to treat the changes that way (e.g. selective
1002 display). We still need to make sure redisplay realizes that the 1002 display). We still need to make sure redisplay realizes that the
1003 contents have potentially altered and it needs to do some 1003 contents have potentially altered and it needs to do some
1004 work. */ 1004 work. */
1005 buf = decode_buffer(buffer, 0);
1005 BUF_MODIFF (buf)++; 1006 BUF_MODIFF (buf)++;
1006 BUF_SAVE_MODIFF (buf) = NILP (flag) ? BUF_MODIFF (buf) : 0; 1007 BUF_SAVE_MODIFF (buf) = NILP (flag) ? BUF_MODIFF (buf) : 0;
1007 MARK_MODELINE_CHANGED; 1008 MARK_MODELINE_CHANGED;
1008 1009
1009 #ifdef ENERGIZE 1010 #ifdef ENERGIZE
2256 #ifdef REGION_CACHE_NEEDS_WORK 2257 #ifdef REGION_CACHE_NEEDS_WORK
2257 buffer_local_flags.cache_long_line_scans = make_int (0x2000); 2258 buffer_local_flags.cache_long_line_scans = make_int (0x2000);
2258 #endif 2259 #endif
2259 buffer_local_flags.buffer_file_type = make_int (0x4000); 2260 buffer_local_flags.buffer_file_type = make_int (0x4000);
2260 #ifdef MULE 2261 #ifdef MULE
2261 buffer_local_flags.file_coding_system = make_int (0x8000); 2262 buffer_local_flags.buffer_file_coding_system = make_int (0x8000);
2262 #endif 2263 #endif
2263 2264
2264 /* #### Warning, 0x4000000 (that's six zeroes) is the largest number 2265 /* #### Warning, 0x4000000 (that's six zeroes) is the largest number
2265 currently allowable due to the XINT() handling of this value. 2266 currently allowable due to the XINT() handling of this value.
2266 With some rearrangement you can get 4 more bits. */ 2267 With some rearrangement you can get 4 more bits. */
2361 %p -- print percent of buffer above top of window, or Top, Bot or All. 2362 %p -- print percent of buffer above top of window, or Top, Bot or All.
2362 %P -- print percent of buffer above bottom of window, perhaps plus Top, 2363 %P -- print percent of buffer above bottom of window, perhaps plus Top,
2363 or print Bottom or All. 2364 or print Bottom or All.
2364 %n -- print Narrow if appropriate. 2365 %n -- print Narrow if appropriate.
2365 %t -- Under MS-DOS, print T if files is text, B if binary. 2366 %t -- Under MS-DOS, print T if files is text, B if binary.
2366 %C -- under XEmacs/Mule, print the mnemonic for `file-coding-system'. 2367 %C -- under XEmacs/mule, print the mnemonic for `buffer-file-coding-system'.
2367 %[ -- print one [ for each recursive editing level. %] similar. 2368 %[ -- print one [ for each recursive editing level. %] similar.
2368 %% -- print %. %- -- print infinitely many dashes. 2369 %% -- print %. %- -- print infinitely many dashes.
2369 Decimal digits after the % specify field width to which to pad. 2370 Decimal digits after the % specify field width to which to pad.
2370 */ ); 2371 */ );
2371 2372
2463 On those systems, it is automatically local in every buffer. 2464 On those systems, it is automatically local in every buffer.
2464 On other systems, this variable is normally always nil. 2465 On other systems, this variable is normally always nil.
2465 */ ); 2466 */ );
2466 2467
2467 #ifdef MULE 2468 #ifdef MULE
2468 DEFVAR_BUFFER_DEFAULTS ("default-file-coding-system", file_coding_system /* 2469 DEFVAR_BUFFER_DEFAULTS ("default-buffer-file-coding-system", buffer_file_coding_system /*
2469 Default value of `file-coding-system' for buffers that do not override it. 2470 Default value of `buffer-file-coding-system' for buffers that do not override it.
2470 This is the same as (default-value 'file-coding-system). 2471 This is the same as (default-value 'buffer-file-coding-system).
2471 This value is used both for buffers without associated files and 2472 This value is used both for buffers without associated files and
2472 for buffers whose files do not have any apparent coding system. 2473 for buffers whose files do not have any apparent coding system.
2473 See `file-coding-system'. 2474 See `buffer-file-coding-system'.
2474 */ ); 2475 */ );
2475 2476
2476 DEFVAR_BUFFER_LOCAL ("file-coding-system", file_coding_system /* 2477 DEFVAR_BUFFER_LOCAL ("buffer-file-coding-system", buffer_file_coding_system /*
2477 *Current coding system for the current buffer. 2478 *Current coding system for the current buffer.
2478 When the buffer is written out into a file, this coding system will 2479 When the buffer is written out into a file, this coding system will
2479 be used for the encoding. Automatically buffer-local when set in 2480 be used for the encoding. Automatically buffer-local when set in
2480 any fashion. This is normally set automatically when a file is loaded 2481 any fashion. This is normally set automatically when a file is loaded
2481 in based on the determined coding system of the file (assuming that 2482 in based on the determined coding system of the file (assuming that
2482 `file-coding-system-for-read' is set to `autodetect', which calls 2483 `buffer-file-coding-system-for-read' is set to `autodetect', which calls
2483 for automatic determination of the file's coding system). Normally the 2484 for automatic determination of the file's coding system). Normally the
2484 modeline indicates the current file coding system using its mnemonic 2485 modeline indicates the current file coding system using its mnemonic
2485 abbreviation. 2486 abbreviation.
2486 2487
2487 The default value for this variable (which is normally used for 2488 The default value for this variable (which is normally used for
2504 original contents of the buffer, which is not the case with 2505 original contents of the buffer, which is not the case with
2505 `iso-2022-8'; but the output is less portable when dealing with binary 2506 `iso-2022-8'; but the output is less portable when dealing with binary
2506 data -- there may be stray ESC characters when the file is read by 2507 data -- there may be stray ESC characters when the file is read by
2507 another program. 2508 another program.
2508 2509
2509 `file-coding-system' does *not* control the coding system used when 2510 `buffer-file-coding-system' does *not* control the coding system used when
2510 a file is read in. Use the variables `file-coding-system-for-read' 2511 a file is read in. Use the variables `buffer-file-coding-system-for-read'
2511 and `file-coding-system-alist' for that. From a Lisp program, if 2512 and `buffer-file-coding-system-alist' for that. From a Lisp program, if
2512 you wish to unilaterally specify the coding system used for one 2513 you wish to unilaterally specify the coding system used for one
2513 particular operation, you should bind the variable 2514 particular operation, you should bind the variable
2514 `coding-system-for-read' rather than changing the other two 2515 `coding-system-for-read' rather than changing the other two
2515 variables just mentioned, which are intended to be used for 2516 variables just mentioned, which are intended to be used for
2516 global environment specification. 2517 global environment specification.