mu4e: ensure filename is valid for removing it later
lexical-let the filename to be removed later, so it's still valid.
This commit is contained in:
@ -142,8 +142,9 @@ return the result."
|
|||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
(defun mu4e-remove-file-later (filename)
|
(defun mu4e-remove-file-later (filename)
|
||||||
"Remove FILENAME in a few seconds."
|
"Remove FILENAME in a few seconds."
|
||||||
|
(lexical-let ((filename filename))
|
||||||
(run-at-time "10 sec" nil
|
(run-at-time "10 sec" nil
|
||||||
(lambda () (ignore-errors (delete-file filename)))))
|
(lambda () (ignore-errors (delete-file filename))))))
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
|||||||
Reference in New Issue
Block a user