Changeset 808

Show
Ignore:
Timestamp:
01/16/10 15:11:35 (8 months ago)
Author:
sience
Message:

-getHomeDir for Windows implemented

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/lugre/lua/lib.util.lua

    r807 r808  
    8484end 
    8585function GetHomePath () -- returns /home/username  without trailing slash 
    86         if (WIN32) then return end -- not yet implemented 
    87         local file = io.popen("echo $HOME") 
    88         if (not file) then return end -- popen or home dir not available 
    89         for line in file:lines() do file:close() return string.sub(line,1,-1) end -- remove newline 
    90         file:close() 
     86        if (WIN32) then 
     87                local file = io.popen("echo %USERPROFILE%") 
     88                if (not file) then return end 
     89                for line in file:lines() do file:close() return string.sub(line,1,-1) end 
     90                file:close() 
     91        else 
     92                local file = io.popen("echo $HOME") 
     93                if (not file) then return end -- popen or home dir not available 
     94                for line in file:lines() do file:close() return string.sub(line,1,-1) end -- remove newline 
     95                file:close() 
     96        end 
    9197end 
    9298