Refactor

site.moon

@@ -1,19 +1,19 @@
 sitegen = require "sitegen"
 lfs = require "lfs"
 
-files = (path="docs") ->
-  ["#{path}/#{file}" for file in lfs.dir(path) when file != "." and file != ".."]
-
-rootname = (str) -> string.gsub str, "%.+", ""
+rootname = (str) -> string.gsub str, "%..+", ""
 last = (list) -> list[#list]
 
-split = (str, delimiter) ->
+split = (str, delimiter="/") ->
   [capture for capture in string.gmatch str, "[^#{delimiter}]+"]
 
-target = (path, delimeter="/") ->
-  "/posts/#{rootname(last(split(path, delimeter)))}"
+join = (first, last, delimiter="/") -> table.concat({first, last}, delimiter)
+target = (path, prefix) -> join(prefix, rootname(last(split path)))
+
+posts = (path=".") ->
+  {join(path, file), target(file, "/posts") for file in lfs.dir path when file != "." and file != ".."}
 
 sitegen.create =>
   @title = "Hello World"
   add "index.md"
-  add path, target: target(path) for _, path in ipairs files!
+  add path, target: target for path, target in pairs posts "docs"