Fix for cljs when a ns does not exist in clojure

Author: plexus

notebooks/ornament_next.clj

@@ -75,6 +75,7 @@
 
 (hiccup/render [:img {:class [square]}])
 
+
 ;; You can also use it in styled components, to pull those additional style
 ;; rules into the CSS of the component.
 
@@ -91,7 +92,10 @@
 
 ;; These can be defined with or without
 
-(o/defprop without-default)
-(o/defprop color-primary "hsla(201, 100%, 50%, 1)")
+(o/defprop --without-default)
+(o/defprop --color-primary "hsla(201, 100%, 50%, 1)")
+
+
+(hiccup/render [:img {:style {:backgroun-color --color-primary}}])
 
 (o/defined-styles)

src/lambdaisland/ornament.cljc

@@ -1,6 +1,5 @@
 (ns lambdaisland.ornament
   "CSS-in-clj(s)"
-<<<<<<< Updated upstream
   #?@
   (:clj
    [(:require
@@ -20,40 +19,6 @@
      [meta-merge.core :as meta-merge])]
    :cljs
    [(:require [clojure.string :as str] [garden.util :as gu])]))
-||||||| Stash base
-  (:require [clojure.string :as str]
-            [meta-merge.core :as meta-merge]
-            #?@(:clj [[clojure.walk :as walk]
-                      [garden.compiler :as gc]
-                      [garden.core :as garden]
-                      [garden.color :as gcolor]
-                      [garden.types :as gt]
-                      [garden.stylesheet :as gs]
-                      [girouette.version :as girouette-version]
-                      [girouette.tw.core :as girouette]
-                      [girouette.tw.preflight :as girouette-preflight]
-                      [girouette.tw.typography :as girouette-typography]
-                      [girouette.tw.color :as girouette-color]
-                      [girouette.tw.default-api :as girouette-default]]))
-  #?(:cljs
-     (:require-macros [lambdaisland.ornament :refer [defstyled]])))
-=======
-  (:require [clojure.string :as str]
-            [meta-merge.core :as meta-merge]
-            #?@(:clj [[clojure.walk :as walk]
-                      [garden.compiler :as gc]
-                      [garden.core :as garden]
-                      [garden.color :as gcolor]
-                      [garden.types :as gt]
-                      [garden.stylesheet :as gs]
-                      [girouette.version :as girouette-version]
-                      [girouette.tw.core :as girouette]
-                      [girouette.tw.preflight :as girouette-preflight]
-                      [girouette.tw.typography :as girouette-typography]
-                      [girouette.tw.color :as girouette-color]]))
-  #?(:cljs
-     (:require-macros [lambdaisland.ornament :refer [defstyled]])))
->>>>>>> Stashed changes
 
 #?(:clj
    (defonce ^{:doc "Registry of styled components
@@ -800,7 +765,7 @@
            rules  (process-rules
                    (eval `(do
                             (in-ns '~(ns-name *ns*))
-                            ~(cons 'list rules))))]
+                            ~(cons 'clojure.core/list rules))))]
        (register! rules-registry varsym {:rules rules})
        (when-not (:ns &env)
          `(def ~rules-name ~(render-docstring docstring rules) '~rules)))))
@@ -1008,4 +973,3 @@
        (sort-by :index)
        (mapcat :rules)
        process-rules))
-