Add functionality to fetch page by title

devin-mitchell · Dec 5, 2022 · a605824 · a605824
1 parent 981f4af
commit a605824
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 0 deletions.
diff --git a/lib/infra/couchdb/content_repo.ex b/lib/infra/couchdb/content_repo.ex
@@ -4,6 +4,17 @@ defmodule Infra.CouchDB.ContentRepo do
   alias Infra.CouchDB
   alias Mantra.Contents.Page
 
+  def get_page_by(:id, page_id) do
+    case CouchDB.Documents.get_document("blocks", page_id) do
+      {:ok, %{status: 404}} ->
+        nil
+
+      {:ok, %{status: 200, body: doc}} ->
+        doc = movekeys(doc, [{"_rev", "rev"}, {"_id", "id"}])
+        Ecto.embedded_load(Page, doc, :atoms)
+    end
+  end
+
   def create_page(page_changeset) do
     with {:ok, page} <- Changeset.apply_action(page_changeset, :insert) do
       page_id = Slug.slugify(page.title, lowercase: false, separator: "__")

diff --git a/lib/mantra/contents/content_repo.ex b/lib/mantra/contents/content_repo.ex
@@ -4,4 +4,6 @@ defmodule Mantra.Contents.ContentRepo do
 
   @callback create_page(Changeset.t(Page.t())) ::
               {:ok, Page.t()} | {:error, Changeset.t(Page.t())}
+
+  @callback get_page_by(:id, page_id :: String.t()) :: Page.t() | nil
 end