diff options
| author | Karl Heuer | 1999-03-26 17:55:42 +0000 |
|---|---|---|
| committer | Karl Heuer | 1999-03-26 17:55:42 +0000 |
| commit | 90d456d2972a4b77637eeba4cce4f2697efb3a32 (patch) | |
| tree | f3b7ffd59936f72b4b725218e327cda2aae61106 | |
| parent | 91245cb0427bdfbef643ae78fd73076616afcfe8 (diff) | |
| download | emacs-90d456d2972a4b77637eeba4cce4f2697efb3a32.tar.gz emacs-90d456d2972a4b77637eeba4cce4f2697efb3a32.zip | |
(Fset_buffer_modified_p): Don't lock or unlock
if buffer-file-name is nil.
| -rw-r--r-- | src/buffer.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/buffer.c b/src/buffer.c index e2aa5818ff1..1089872ebe7 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -807,7 +807,8 @@ A non-nil FLAG means mark the buffer modified.") | |||
| 807 | If buffer becoming unmodified, unlock the file. */ | 807 | If buffer becoming unmodified, unlock the file. */ |
| 808 | 808 | ||
| 809 | fn = current_buffer->file_truename; | 809 | fn = current_buffer->file_truename; |
| 810 | if (!NILP (fn)) | 810 | /* Test buffer-file-name so that binding it to nil is effective. */ |
| 811 | if (!NILP (fn) && ! NILP (current_buffer->filename)) | ||
| 811 | { | 812 | { |
| 812 | already = SAVE_MODIFF < MODIFF; | 813 | already = SAVE_MODIFF < MODIFF; |
| 813 | if (!already && !NILP (flag)) | 814 | if (!already && !NILP (flag)) |