diff options
| author | Paul Eggert | 2011-01-17 11:24:36 -0800 |
|---|---|---|
| committer | Paul Eggert | 2011-01-17 11:24:36 -0800 |
| commit | 15ef8755824eef3336ebb95dbeacb39214f89503 (patch) | |
| tree | 6fa45b0bd14c8af9f1ae202cb9759985a916fbf6 /src/fileio.c | |
| parent | 3cbecb8f286aa3309f68d9909317e03df4f597d6 (diff) | |
| parent | 717c30e0027175fc8bb849728e5c9b4c3e9b2adf (diff) | |
| download | emacs-15ef8755824eef3336ebb95dbeacb39214f89503.tar.gz emacs-15ef8755824eef3336ebb95dbeacb39214f89503.zip | |
Merge from mainline.
Diffstat (limited to 'src/fileio.c')
| -rw-r--r-- | src/fileio.c | 13 |
1 files changed, 4 insertions, 9 deletions
diff --git a/src/fileio.c b/src/fileio.c index 2a415d2d697..737eeaddaec 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -737,17 +737,13 @@ make_temp_name (Lisp_Object prefix, int base64_p) | |||
| 737 | as bad as (and in many cases worse than) throwing the | 737 | as bad as (and in many cases worse than) throwing the |
| 738 | error, or to ignore the error, which will likely result | 738 | error, or to ignore the error, which will likely result |
| 739 | in looping through 225307 stat's, which is not only | 739 | in looping through 225307 stat's, which is not only |
| 740 | dog-slow, but also useless since it will fallback to | 740 | dog-slow, but also useless since eventually nil would |
| 741 | the errow below, anyway. */ | 741 | have to be returned anyway. */ |
| 742 | report_file_error ("Cannot create temporary name for prefix", | 742 | report_file_error ("Cannot create temporary name for prefix", |
| 743 | Fcons (prefix, Qnil)); | 743 | Fcons (prefix, Qnil)); |
| 744 | /* not reached */ | 744 | /* not reached */ |
| 745 | } | 745 | } |
| 746 | } | 746 | } |
| 747 | |||
| 748 | error ("Cannot create temporary name for prefix `%s'", | ||
| 749 | SDATA (prefix)); | ||
| 750 | return Qnil; | ||
| 751 | } | 747 | } |
| 752 | 748 | ||
| 753 | 749 | ||
| @@ -5229,7 +5225,7 @@ auto_save_1 (void) | |||
| 5229 | 5225 | ||
| 5230 | static Lisp_Object | 5226 | static Lisp_Object |
| 5231 | do_auto_save_unwind (Lisp_Object arg) /* used as unwind-protect function */ | 5227 | do_auto_save_unwind (Lisp_Object arg) /* used as unwind-protect function */ |
| 5232 | 5228 | ||
| 5233 | { | 5229 | { |
| 5234 | FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer; | 5230 | FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer; |
| 5235 | auto_saving = 0; | 5231 | auto_saving = 0; |
| @@ -5244,7 +5240,7 @@ do_auto_save_unwind (Lisp_Object arg) /* used as unwind-protect function */ | |||
| 5244 | 5240 | ||
| 5245 | static Lisp_Object | 5241 | static Lisp_Object |
| 5246 | do_auto_save_unwind_1 (Lisp_Object value) /* used as unwind-protect function */ | 5242 | do_auto_save_unwind_1 (Lisp_Object value) /* used as unwind-protect function */ |
| 5247 | 5243 | ||
| 5248 | { | 5244 | { |
| 5249 | minibuffer_auto_raise = XINT (value); | 5245 | minibuffer_auto_raise = XINT (value); |
| 5250 | return Qnil; | 5246 | return Qnil; |
| @@ -5870,4 +5866,3 @@ This includes interactive calls to `delete-file' and | |||
| 5870 | defsubr (&Sunix_sync); | 5866 | defsubr (&Sunix_sync); |
| 5871 | #endif | 5867 | #endif |
| 5872 | } | 5868 | } |
| 5873 | |||