From f5952338f46ba62c42054a64c4b8b75ec6dfb51f Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Fri, 12 Feb 2010 21:35:45 +0200 Subject: * arc-mode.el (archive-unique-fname): Make directories for nested archives. (Bug#5540) --- lisp/arc-mode.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'lisp/arc-mode.el') diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el index ee32d893654..5942e920a65 100644 --- a/lisp/arc-mode.el +++ b/lisp/arc-mode.el @@ -834,6 +834,11 @@ using `make-temp-file', and the generated name is returned." ;; reconstructed in the temporary directory. (make-directory (file-name-directory tmpfile) t) (make-temp-file tmpfile)) + ;; Maked sure all the leading directories in `fullname' exist + ;; under archive-tmpdir. This is necessary for nested archives + ;; (`archive-extract' sets `archive-remote' to t in case + ;; an archive occurs inside another archive). + (make-directory (file-name-directory fullname) t) fullname))) (defun archive-maybe-copy (archive) -- cgit v1.2.3