Cleaner switcher

Author: philippamarkovics

notebooks/tap_window.clj

@@ -3,15 +3,15 @@
   {:nextjournal.clerk/visibility {:code :hide :result :hide}
    :nextjournal.clerk/no-cache true}
   (:require [nextjournal.clerk :as clerk]
-            [nextjournal.clerk.tap :as tap]
-            [nextjournal.clerk.window :as window]))
+            [nextjournal.clerk.window :as window]
+            [nextjournal.clerk.tap :as tap]))
 
-(clerk/window! :my-window (clerk/html [:div.w-8.h-8.bg-green-500]))
+#_(clerk/window! :my-window (clerk/html [:div.w-8.h-8.bg-green-500]))
 
-(comment
-  (clerk/destroy-window! :my-window)
-  (clerk/destroy-all-windows!)
-  (clerk/window! ::window/taps)
-  (tap> (clerk/html [:div.w-8.h-8.bg-green-500]))
-  (tap> (clerk/plotly {:data [{:x [1 2 3 4]}]}))
-  (tap/reset-taps!))
+#_(comment
+    (clerk/destroy-window! :my-window)
+    (clerk/destroy-all-windows!)
+    (clerk/window! ::window/taps)
+    (tap> (clerk/html [:div.w-8.h-8.bg-green-500]))
+    (tap> (clerk/plotly {:data [{:x [1 2 3 4]}]}))
+    (tap/reset-taps!))

src/nextjournal/clerk/window.clj

@@ -15,12 +15,12 @@
                    (into [:div.flex.items-center]
                          (map (fn [choice]
                                 [:button.transition-all.mr-2.relative
-                                 {:class (str "h-[24px] border-b-2 "
+                                 {:class (str "h-[24px] "
                                               (if (= taps-view choice)
-                                                "text-indigo-600 border-indigo-600 font-bold "
-                                                "text-slate-500 border-transparent hover:text-indigo-600 "))
+                                                "text-indigo-600 font-bold "
+                                                "text-slate-500 hover:text-indigo-600 "))
                                   :on-click #(nextjournal.clerk.render/clerk-eval `(set-view! ~choice))}
-                                 [:span.relative {:class "-bottom-[2px]"} (clojure.string/capitalize (name choice))]])
+                                 (clojure.string/capitalize (name choice))])
                               [:stream :latest]))
                    [:button.text-slate-500.hover:text-indigo-600
                     {:on-click #(nextjournal.clerk.render/clerk-eval `(tap/reset-taps!))}