Check ns is required before sci-copy-nss

nextjournal · Oct 7, 2024 · bbf83ca · bbf83ca
1 parent 6c7e35e
commit bbf83ca
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/nextjournal/clerk/render/macros.clj b/src/nextjournal/clerk/render/macros.clj
@@ -2,7 +2,10 @@
 
 (defmacro sci-copy-nss [& nss]
   (into {} (for [[_ ns] nss]
-             [(list 'quote ns) `(sci.core/copy-ns ~ns (sci.core/create-ns '~ns))])))
+             `[(quote ~ns)
+               (if (empty? (ns-publics (quote ~ns)))
+                 (throw (ex-info (str "Namespace " (quote ~ns) " is empty, forgot to require?") {:ns (quote ~ns)}))
+                 (sci.core/copy-ns ~ns (sci.core/create-ns '~ns)))])))
 
 #_(macroexpand '(sci-copy-nss 'nextjournal.clerk.render.hoooks
                               'nextjournal.clerk.render.code))