unofficial mirror of help-gnu-emacs@gnu.org
 help / color / mirror / Atom feed
* delete-file succeeds without deleting the file
@ 2016-01-11  6:16 Michael Heerdegen
  0 siblings, 0 replies; only message in thread
From: Michael Heerdegen @ 2016-01-11  6:16 UTC (permalink / raw)
  To: Emacs mailing list

Hello,

in my code, I want to use something like this:

--8<---------------cut here---------------start------------->8---
(defmacro foo-save-index (&rest body)
  ;; Modeled after `magit-with-temp-index'
  (declare (debug t))
  (macroexp-let2 nil temp-index-file '(expand-file-name (make-temp-name "index.foo"))
    `(unwind-protect
         (let ((process-environment process-environment))
           (setenv "GIT_INDEX_FILE" ,temp-index-file)
           ,@body)
       (when (file-exists-p ,temp-index-file) (delete-file ,temp-index-file)))))
--8<---------------cut here---------------end--------------->8---

This makes it possible to work with a temporary git index while working
with git commands in BODY.  All those commands are synchronous.

This works as expected, but in some, quite rare cases, the temporary
index file survives.  There is no error, and delete-file seems to
terminate always successfully.

Anybody any idea how this can happen?


Thanks,

Michael.



^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2016-01-11  6:16 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-01-11  6:16 delete-file succeeds without deleting the file Michael Heerdegen

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).