diff options
| author | Stefan Monnier | 2008-03-20 18:13:12 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2008-03-20 18:13:12 +0000 |
| commit | bf1c0f273079b617703d7e875880db85da127493 (patch) | |
| tree | 82eb4709761ac3f20b92b0e1b691ee0c3667d39d /src | |
| parent | acab783e7ff99fefdc0d5ecd341a41ef969d13a4 (diff) | |
| download | emacs-bf1c0f273079b617703d7e875880db85da127493.tar.gz emacs-bf1c0f273079b617703d7e875880db85da127493.zip | |
* fileio.c (Finsert_file_contents):
* lread.c (Feval_buffer): Use BUF_TEMP_SET_PT.
* buffer.h (BUF_SET_PT): Remove. set_point_both doesn't work right
when buffer != current_buffer anyway.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 7 | ||||
| -rw-r--r-- | src/buffer.h | 2 | ||||
| -rw-r--r-- | src/fileio.c | 4 | ||||
| -rw-r--r-- | src/lread.c | 2 |
4 files changed, 10 insertions, 5 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 59904d09159..8d077381c8d 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2008-03-20 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * fileio.c (Finsert_file_contents): | ||
| 4 | * lread.c (Feval_buffer): Use BUF_TEMP_SET_PT. | ||
| 5 | * buffer.h (BUF_SET_PT): Remove. set_point_both doesn't work right | ||
| 6 | when buffer != current_buffer anyway. | ||
| 7 | |||
| 1 | 2008-03-20 Andreas Schwab <schwab@suse.de> | 8 | 2008-03-20 Andreas Schwab <schwab@suse.de> |
| 2 | 9 | ||
| 3 | * callint.c (Fcall_interactively) [case 'B']: Use other-buffer | 10 | * callint.c (Fcall_interactively) [case 'B']: Use other-buffer |
diff --git a/src/buffer.h b/src/buffer.h index 5c2dd5bc143..eb1f0a71686 100644 --- a/src/buffer.h +++ b/src/buffer.h | |||
| @@ -216,8 +216,6 @@ Boston, MA 02110-1301, USA. */ | |||
| 216 | #define TEMP_SET_PT_BOTH(position, byte) \ | 216 | #define TEMP_SET_PT_BOTH(position, byte) \ |
| 217 | (temp_set_point_both (current_buffer, (position), (byte))) | 217 | (temp_set_point_both (current_buffer, (position), (byte))) |
| 218 | 218 | ||
| 219 | #define BUF_SET_PT(buffer, position) \ | ||
| 220 | (set_point ((buffer), (position))) | ||
| 221 | #define BUF_TEMP_SET_PT(buffer, position) \ | 219 | #define BUF_TEMP_SET_PT(buffer, position) \ |
| 222 | (temp_set_point ((buffer), (position))) | 220 | (temp_set_point ((buffer), (position))) |
| 223 | 221 | ||
diff --git a/src/fileio.c b/src/fileio.c index f478b4a1fad..fe05cf9d441 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -4237,8 +4237,8 @@ variable `last-coding-system-used' to the coding system actually used. */) | |||
| 4237 | 4237 | ||
| 4238 | how_much += this; | 4238 | how_much += this; |
| 4239 | 4239 | ||
| 4240 | BUF_SET_PT (XBUFFER (conversion_buffer), | 4240 | BUF_TEMP_SET_PT (XBUFFER (conversion_buffer), |
| 4241 | BUF_Z (XBUFFER (conversion_buffer))); | 4241 | BUF_Z (XBUFFER (conversion_buffer))); |
| 4242 | decode_coding_c_string (&coding, read_buf, unprocessed + this, | 4242 | decode_coding_c_string (&coding, read_buf, unprocessed + this, |
| 4243 | conversion_buffer); | 4243 | conversion_buffer); |
| 4244 | unprocessed = coding.carryover_bytes; | 4244 | unprocessed = coding.carryover_bytes; |
diff --git a/src/lread.c b/src/lread.c index c1ee53056ac..77c7a3c875f 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -1850,7 +1850,7 @@ This function preserves the position of point. */) | |||
| 1850 | specbind (Qeval_buffer_list, Fcons (buf, Veval_buffer_list)); | 1850 | specbind (Qeval_buffer_list, Fcons (buf, Veval_buffer_list)); |
| 1851 | specbind (Qstandard_output, tem); | 1851 | specbind (Qstandard_output, tem); |
| 1852 | record_unwind_protect (save_excursion_restore, save_excursion_save ()); | 1852 | record_unwind_protect (save_excursion_restore, save_excursion_save ()); |
| 1853 | BUF_SET_PT (XBUFFER (buf), BUF_BEGV (XBUFFER (buf))); | 1853 | BUF_TEMP_SET_PT (XBUFFER (buf), BUF_BEGV (XBUFFER (buf))); |
| 1854 | readevalloop (buf, 0, filename, Feval, | 1854 | readevalloop (buf, 0, filename, Feval, |
| 1855 | !NILP (printflag), unibyte, Qnil, Qnil, Qnil); | 1855 | !NILP (printflag), unibyte, Qnil, Qnil, Qnil); |
| 1856 | unbind_to (count, Qnil); | 1856 | unbind_to (count, Qnil); |