fix: correctly create page modules

elixir-tools · Nov 8, 2023 · 8ea0936 · 8ea0936
1 parent 67c5052
commit 8ea0936
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 6 deletions.
diff --git a/lib/tableau/extensions/page_extension.ex b/lib/tableau/extensions/page_extension.ex
@@ -75,7 +75,7 @@ defmodule Tableau.PageExtension do
 
         for {mod, _, _} <- :code.all_available(),
             mod = Module.concat([to_string(mod)]),
-            Tableau.Graph.Node.type(mod) == :page,
+            {:ok, :page} == Tableau.Graph.Node.type(mod),
             mod.__tableau_opts__()[:__tableau_page_extension__] do
           :code.purge(mod)
           :code.delete(mod)
@@ -84,8 +84,9 @@ defmodule Tableau.PageExtension do
         pages =
           for page <- apply(Tableau.PageExtension.Pages, :pages, []) do
             {:module, _module, _binary, _term} =
-              Module.create(
-                :"#{System.unique_integer()}",
+              [:"#{System.unique_integer()}"]
+              |> Module.concat()
+              |> Module.create(
                 quote do
                   use Tableau.Page, unquote(Macro.escape(Keyword.new(page)))
 

diff --git a/lib/tableau/extensions/post_extension.ex b/lib/tableau/extensions/post_extension.ex
@@ -89,7 +89,7 @@ defmodule Tableau.PostExtension do
 
         for {mod, _, _} <- :code.all_available(),
             mod = Module.concat([to_string(mod)]),
-            Tableau.Graph.Node.type(mod) == :page,
+            {:ok, :page} == Tableau.Graph.Node.type(mod),
             mod.__tableau_opts__()[:__tableau_post_extension__] do
           :code.purge(mod)
           :code.delete(mod)
@@ -98,8 +98,9 @@ defmodule Tableau.PostExtension do
         posts =
           for post <- apply(Tableau.PostExtension.Posts, :posts, []) do
             {:module, _module, _binary, _term} =
-              Module.create(
-                :"#{System.unique_integer()}",
+              [:"#{System.unique_integer()}"]
+              |> Module.concat()
+              |> Module.create(
                 quote do
                   use Tableau.Page, unquote(Macro.escape(Keyword.new(post)))