remove temp file after upload to special remote

diff --git a/Annex/Proxy.hs b/Annex/Proxy.hs
index 34bed0f24ae4f03551b983a8a12eec367f7cd7e0..56449518c95285e29499bf68500b5c090f3d6784 100644 (file)
--- a/Annex/Proxy.hs
+++ b/Annex/Proxy.hs
@@ -179,6 +179,7 @@ proxySpecialRemote protoversion r ihdl ohdl owaitv endv = go
                                                        _ -> giveup "protocol error"
                                                else store
                                _ -> giveup "protocol error"
+                       liftIO $ removeWhenExistsWith removeFile (fromRawFilePath tmpfile)
 
        proxyget offset af k = withproxytmpfile k $ \tmpfile -> do
                -- Don't verify the content from the remote,

diff --git a/doc/todo/git-annex_proxies.mdwn b/doc/todo/git-annex_proxies.mdwn
index a076813c0a41bf3dc30afbaec9af02933c881cde..8b2da98e04b3cd43508fbc225d300fc40eb67dca 100644 (file)
--- a/doc/todo/git-annex_proxies.mdwn
+++ b/doc/todo/git-annex_proxies.mdwn
@@ -28,6 +28,9 @@ Planned schedule of work:
 
 ## work notes
 
+* testremote hangs at PUT to on a cluster accessed over http that
+  has a node that is a directory special remote.
+
 * When part of a file has been sent to a cluster via the http server,
   the transfer interrupted, and another node is added to the cluster,
   and the transfer of the file performed again, there is a failure