chore(dir) reduce scopes and fix indentation

1 files changed, 36 insertions, 34 deletions

diff --git a/lua/pl/dir.lua b/lua/pl/dir.lua
index 56d084c..4e3922e 100644
--- a/lua/pl/dir.lua
+++ b/lua/pl/dir.lua
@@ -349,43 +349,45 @@ function dir.rmtree(fullpath)
     return true
 end
 
-local dirpat
-if path.is_windows then
-    dirpat = '(.+)\\[^\\]+$'
-else
-    dirpat = '(.+)/[^/]+$'
-end
-
-local _makepath
-function _makepath(p)
-    -- windows root drive case
-    if p:find '^%a:[\\]*$' then
-        return true
-    end
-   if not path.isdir(p) then
-    local subp = p:match(dirpat)
-    local ok, err = _makepath(subp)
-    if not ok then return nil, err end
-    return mkdir(p)
-   else
-    return true
-   end
-end
 
---- create a directory path.
--- This will create subdirectories as necessary!
--- @string p A directory path
--- @return true on success, nil + errormsg on failure
--- @raise failure to create
-function dir.makepath (p)
-    assert_string(1,p)
-    if path.is_windows then
-        p = p:gsub("/", "\\")
-    end
-    return _makepath(path.abspath(p))
+do
+  local dirpat
+  if path.is_windows then
+      dirpat = '(.+)\\[^\\]+$'
+  else
+      dirpat = '(.+)/[^/]+$'
+  end
+
+  local _makepath
+  function _makepath(p)
+      -- windows root drive case
+      if p:find '^%a:[\\]*$' then
+          return true
+      end
+      if not path.isdir(p) then
+          local subp = p:match(dirpat)
+          local ok, err = _makepath(subp)
+          if not ok then return nil, err end
+          return mkdir(p)
+      else
+          return true
+      end
+  end
+
+  --- create a directory path.
+  -- This will create subdirectories as necessary!
+  -- @string p A directory path
+  -- @return true on success, nil + errormsg on failure
+  -- @raise failure to create
+  function dir.makepath (p)
+      assert_string(1,p)
+      if path.is_windows then
+          p = p:gsub("/", "\\")
+      end
+      return _makepath(path.abspath(p))
+  end
 end
 
-
 --- clone a directory tree. Will always try to create a new directory structure
 -- if necessary.
 -- @string path1 the base path of the source tree