From 2b48e8de7d43789e10ae06ba6e927ac0b8b3c83e Mon Sep 17 00:00:00 2001
From: Kelet <kelethunter@gmail.com>
Date: Sat, 9 Nov 2013 13:12:55 -0500
Subject: [PATCH] Put temporary file in %TEMP% on Windows

May potentially fix issue 76, as the filenames returned by os.tmpname()
were going into my C drive root directory due to the \ in the front.
I suspect that some people may not have user permissions to read/write
to the root of their C drive. I don't know why os.tmpname() does not
give a file in %TEMP% on Windows like it does on Linux. Maybe it's a
bug.
---
 editors/textadept/modules/dmd/dcd.lua | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/editors/textadept/modules/dmd/dcd.lua b/editors/textadept/modules/dmd/dcd.lua
index e03cb64..3f3ba2d 100644
--- a/editors/textadept/modules/dmd/dcd.lua
+++ b/editors/textadept/modules/dmd/dcd.lua
@@ -102,18 +102,20 @@ end
 
 function M.gotoDeclaration()
 	local fileName = os.tmpname()
-	local command = M.PATH_TO_DCD_CLIENT .. " -l -c" .. buffer.current_pos .. " > " .. fileName
 	local mode = "w"
 	if _G.WIN32 then
+		fileName = os.getenv('TEMP') .. fileName
 		mode = "wb"
 	end
+	local command = M.PATH_TO_DCD_CLIENT .. " -l -c" .. buffer.current_pos ..
+	                " > \"" .. fileName .. "\""
 	local p = io.popen(command, mode)
 	p:write(buffer:get_text())
 	p:flush()
 	p:close()
 	local tmpFile = io.open(fileName, "r")
 	local r = tmpFile:read("*a")
-	io.close(tmpFile)
+	tmpFile:close()
 	if r ~= "Not found\n" then
 		path, position = r:match("^(.-)\t(%d+)")
 		if (path ~= nil and position ~= nil) then
@@ -139,18 +141,20 @@ end)
 function M.autocomplete(ch)
 	if buffer:get_lexer() ~= "dmd" then return end
 	local fileName = os.tmpname()
-	local command = M.PATH_TO_DCD_CLIENT .. " -c" .. buffer.current_pos .. " > " .. fileName
 	local mode = "w"
 	if _G.WIN32 then
+		fileName = os.getenv('TEMP') .. fileName
 		mode = "wb"
 	end
+	local command = M.PATH_TO_DCD_CLIENT .. " -c" .. buffer.current_pos ..
+	                " > \"" .. fileName .. "\""
 	local p = io.popen(command, mode)
 	p:write(buffer:get_text())
 	p:flush()
 	p:close()
 	local tmpFile = io.open(fileName, "r")
 	local r = tmpFile:read("*a")
-	io.close(tmpFile)
+	tmpFile:close()
 	if r ~= "\n" then
 		if r:match("^identifiers.*") then
 			showCompletionList(r)