fix invisible empty state

Termina · Oct 21, 2024 · f68564b · f68564b
1 parent efb895d
commit f68564b
Show file tree

Hide file tree

Showing 2 changed files with 17 additions and 17 deletions.
diff --git a/calcit.cirru b/calcit.cirru
diff --git a/compact.cirru b/compact.cirru
@@ -245,7 +245,8 @@
                     div
                       {} $ :class-name (str-spaced style-message-list)
                       a $ {}
-                        :inner-text $ turn-str (:model state)
+                        :inner-text $ turn-str
+                          or (:model state) "\"Gemini"
                         :class-name $ str-spaced style-a-toggler css/font-fancy
                         :style $ {}
                           :opacity $ if (= model :anthropic) 1 0.3
@@ -424,10 +425,8 @@
         |submit-message! $ %{} :CodeEntry (:doc |)
           :code $ quote
             defn submit-message! (cursor state prompt-text model d!) (hint-fn async)
-              case-default
-                w-js-log $ :model state
-                call-gemini-msg! cursor state prompt-text d!
-                :anthropic $ call-anthropic-msg! cursor state prompt-text d!
+              case-default (:model state) (call-gemini-msg! cursor state prompt-text d!)
+                :claude $ call-anthropic-msg! cursor state prompt-text d!
                 :deepinfra $ call-deepinfra-msg! cursor state prompt-text d!
       :ns $ %{} :CodeEntry (:doc |)
         :code $ quote