[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 0697719: Let url use default file modes when copyin
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master 0697719: Let url use default file modes when copying files |
Date: |
Fri, 25 Dec 2015 21:40:47 +0000 |
branch: master
commit 0697719d7368f232f7c0ba5003387c28908bbfdb
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Let url use default file modes when copying files
* lisp/url/url-handlers.el (url-copy-file): Use default file
modes when copying files (bug#11400).
---
lisp/url/url-handlers.el | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/lisp/url/url-handlers.el b/lisp/url/url-handlers.el
index d13df69..6d2a5c2 100644
--- a/lisp/url/url-handlers.el
+++ b/lisp/url/url-handlers.el
@@ -269,7 +269,8 @@ A prefix arg makes KEEP-TIME non-nil."
(error "Opening input file: No such file or directory, %s" url))
(with-current-buffer buffer
(setq handle (mm-dissect-buffer t)))
- (mm-save-part-to-file handle newname)
+ (let ((mm-attachment-file-modes (default-file-modes)))
+ (mm-save-part-to-file handle newname))
(kill-buffer buffer)
(mm-destroy-parts handle)))
(put 'copy-file 'url-file-handlers 'url-copy-file)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 0697719: Let url use default file modes when copying files,
Lars Ingebrigtsen <=