logsrv/apps/logsrv_api/lib/logsrv_api/crawler.ex

@@ -1,7 +0,0 @@
-defmodule LogsrvApi.Crawler do
-  alias LogsrvApi.{Filesystem,Page,Journal}
-
-  def crawl do
-    Filesystem.
-  end
-end

logsrv/apps/logsrv_api/lib/logsrv_api/filesystem.ex

@@ -24,23 +24,11 @@ defmodule LogsrvApi.Filesystem do
   def all(Page) do
     dir(:pages)
     |> File.ls!
+    |> Enum.sort
     |> Enum.map(fn(fd) ->
-      case fd |> File.ls do
-        {:error, _} ->
-          IO.puts("Error on #{fd}")
       Page.init(fd)
-        pages ->
-          IO.puts(pages)
-          pages |> Enum.map(fn(page) ->
-            "pages/#{page}" |> Page.init
     end)
   end
-    end)
-    |> Enum.sort(&sort/2)
-  end
-  def sort(a, b) do
-    Timex.compare(a.date, b.date) > 0
-  end
 
   def all(Journal) do
     dir(:journals)

logsrv/apps/logsrv_api/lib/logsrv_api/page.ex

@@ -49,14 +49,13 @@ defmodule LogsrvApi.Page do
       {:nil, Earmark.as_html!(data)}
     end
   end
-  def parse_yaml(yaml) do
+  defp parse_yaml(yaml) do
-    yaml
+    [parsed] = :yamerl_constr.string(yaml)
-    |> :yamerl_constr.string
+    parsed
-    |> List.flatten
   end
   defp extract({props, content}, post) do
     %{post |
-      title: get_prop(props, "title") |>  to_string ||  post.title,
+      title: get_prop(props, "title") ||  post.title,
       tags: get_prop(props, "tags"),
       content: content}
   end
@@ -66,7 +65,7 @@ defmodule LogsrvApi.Page do
     else
       case :proplists.get_value(String.to_char_list(key), props) do
         :undefined -> nil
-        x -> x
+        x -> to_string(x)
       end
     end
   end