diff options
| author | Karoly Lorentey | 2007-04-22 12:12:29 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2007-04-22 12:12:29 +0000 |
| commit | e18c709364b095ea0be8ecabe458ac9a642a252f (patch) | |
| tree | efe814a842f932f387b3947c572bf43a548d17ef /src/fileio.c | |
| parent | 81088e260b086fe28f36964f32b6338210ec6fd8 (diff) | |
| parent | 9f25e707aaad5ed14a9448e9c5d345ff0bdbc5a7 (diff) | |
| download | emacs-e18c709364b095ea0be8ecabe458ac9a642a252f.tar.gz emacs-e18c709364b095ea0be8ecabe458ac9a642a252f.zip | |
Merged from emacs@sv.gnu.org
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-660
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-661
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-662
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-663
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-664
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-665
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-666
Fix read-only prompt problem in isearch
* emacs@sv.gnu.org/emacs--devo--0--patch-667
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-668
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-669
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-670
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-671
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-672
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-673
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-206
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-207
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-208
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-600
Diffstat (limited to 'src/fileio.c')
| -rw-r--r-- | src/fileio.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/fileio.c b/src/fileio.c index 074a7a0527c..7cb45a72db7 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -5806,7 +5806,11 @@ do_auto_save_unwind (arg) /* used as unwind-protect function */ | |||
| 5806 | FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer; | 5806 | FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer; |
| 5807 | auto_saving = 0; | 5807 | auto_saving = 0; |
| 5808 | if (stream != NULL) | 5808 | if (stream != NULL) |
| 5809 | fclose (stream); | 5809 | { |
| 5810 | BLOCK_INPUT; | ||
| 5811 | fclose (stream); | ||
| 5812 | UNBLOCK_INPUT; | ||
| 5813 | } | ||
| 5810 | return Qnil; | 5814 | return Qnil; |
| 5811 | } | 5815 | } |
| 5812 | 5816 | ||
| @@ -5936,6 +5940,7 @@ A non-nil CURRENT-ONLY argument means save only current buffer. */) | |||
| 5936 | if (STRINGP (b->auto_save_file_name) | 5940 | if (STRINGP (b->auto_save_file_name) |
| 5937 | && stream != NULL && do_handled_files == 0) | 5941 | && stream != NULL && do_handled_files == 0) |
| 5938 | { | 5942 | { |
| 5943 | BLOCK_INPUT; | ||
| 5939 | if (!NILP (b->filename)) | 5944 | if (!NILP (b->filename)) |
| 5940 | { | 5945 | { |
| 5941 | fwrite (SDATA (b->filename), 1, | 5946 | fwrite (SDATA (b->filename), 1, |
| @@ -5945,6 +5950,7 @@ A non-nil CURRENT-ONLY argument means save only current buffer. */) | |||
| 5945 | fwrite (SDATA (b->auto_save_file_name), 1, | 5950 | fwrite (SDATA (b->auto_save_file_name), 1, |
| 5946 | SBYTES (b->auto_save_file_name), stream); | 5951 | SBYTES (b->auto_save_file_name), stream); |
| 5947 | putc ('\n', stream); | 5952 | putc ('\n', stream); |
| 5953 | UNBLOCK_INPUT; | ||
| 5948 | } | 5954 | } |
| 5949 | 5955 | ||
| 5950 | if (!NILP (current_only) | 5956 | if (!NILP (current_only) |