Skip to content

Commit b00668a

Browse files
committed
upgrade deps
1 parent b9ee544 commit b00668a

File tree

4 files changed

+312
-253
lines changed

4 files changed

+312
-253
lines changed

compact.cirru

Lines changed: 53 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -8,12 +8,16 @@
88
:defs $ {}
99
|*abort-control $ %{} :CodeEntry (:doc |)
1010
:code $ quote (defatom *abort-control nil)
11+
:examples $ []
1112
|*gen-ai-new $ %{} :CodeEntry (:doc |)
1213
:code $ quote (defatom *gen-ai-new nil)
14+
:examples $ []
1315
|*image-cache $ %{} :CodeEntry (:doc |)
1416
:code $ quote (defatom *image-cache nil)
17+
:examples $ []
1518
|*openai $ %{} :CodeEntry (:doc "|called openai sdk, but actually for openrouter")
1619
:code $ quote (defatom *openai nil)
20+
:examples $ []
1721
|call-anthropic-msg! $ %{} :CodeEntry (:doc |)
1822
:code $ quote
1923
defn call-anthropic-msg! (cursor state prompt-text model thinking? d!) (hint-fn async)
@@ -100,6 +104,7 @@
100104
-> state (assoc :answer @*text) (assoc :loading? false) (assoc :done? false)
101105
recur xss
102106
recur
107+
:examples $ []
103108
|call-deepinfra-msg! $ %{} :CodeEntry (:doc |)
104109
:code $ quote
105110
defn call-deepinfra-msg! (cursor state prompt-text d! *text) (hint-fn async)
@@ -164,6 +169,7 @@
164169
d! $ :: :states cursor
165170
-> state (assoc :answer @*text) (assoc :loading? false) (assoc :done? false)
166171
recur
172+
:examples $ []
167173
|call-flash-imagen-msg! $ %{} :CodeEntry (:doc |)
168174
:code $ quote
169175
defn call-flash-imagen-msg! (variant cursor state prompt-text d!) (hint-fn async)
@@ -220,6 +226,7 @@
220226
-> state (assoc :answer @*text) (assoc :loading? false) (assoc :done? false)
221227
d! $ :: :states cursor
222228
-> state (assoc :answer @*text) (assoc :loading? false) (assoc :done? true)
229+
:examples $ []
223230
|call-genai-msg! $ %{} :CodeEntry (:doc |)
224231
:code $ quote
225232
defn call-genai-msg! (variant cursor state prompt-text search? think? d! *text) (hint-fn async)
@@ -292,6 +299,7 @@
292299
{} (:answer @*text) (:loading? false) (:done? false)
293300
d! $ :: :states-merge cursor state
294301
{} (:answer @*text) (:loading? false) (:done? true)
302+
:examples $ []
295303
|call-imagen-3-msg! $ %{} :CodeEntry (:doc |)
296304
:code $ quote
297305
defn call-imagen-3-msg! (variant cursor state prompt-text d!) (hint-fn async)
@@ -335,6 +343,7 @@
335343
-> state (assoc :answer @*text) (assoc :loading? false) (assoc :done? false)
336344
d! $ :: :states cursor
337345
-> state (assoc :answer @*text) (assoc :loading? false) (assoc :done? true)
346+
:examples $ []
338347
|call-openrouter! $ %{} :CodeEntry (:doc |)
339348
:code $ quote
340349
defn call-openrouter! (cursor state prompt-text variant thinking? d! *text) (hint-fn async)
@@ -384,10 +393,12 @@
384393
{} (:answer @*text) (:loading? false) (:done? false)
385394
d! $ :: :states-merge cursor state
386395
{} (:answer @*text) (:loading? false) (:done? true)
396+
:examples $ []
387397
|clear-image-cache! $ %{} :CodeEntry (:doc |)
388398
:code $ quote
389399
defn clear-image-cache! () $ if-let (url @*image-cache)
390400
do (js/URL.revokeObjectURL url) (reset! *image-cache nil)
401+
:examples $ []
391402
|comp-abort $ %{} :CodeEntry (:doc |)
392403
:code $ quote
393404
defn comp-abort (t)
@@ -402,6 +413,7 @@
402413
<> t
403414
=< 8 nil
404415
<> "\"✕" style-abort-close
416+
:examples $ []
405417
|comp-container $ %{} :CodeEntry (:doc |)
406418
:code $ quote
407419
defcomp comp-container (reel)
@@ -468,6 +480,7 @@
468480
model-plugin.render
469481
if dev? $ comp-reel (>> states :reel) reel ({})
470482
if dev? $ comp-inspect "\"Store" store nil
483+
:examples $ []
471484
|comp-message-box $ %{} :CodeEntry (:doc |)
472485
:code $ quote
473486
defcomp comp-message-box (states on-submit)
@@ -551,12 +564,14 @@
551564
:on-click $ fn (e d!)
552565
; println $ :content state
553566
on-submit (:content state) (:search? state) (:think? state) d!
567+
:examples $ []
554568
|effect-focus $ %{} :CodeEntry (:doc |)
555569
:code $ quote
556570
defeffect effect-focus () (action el at?)
557571
when (= action :mount)
558572
js/setTimeout $ fn ()
559573
.!select $ .!querySelector el "\"textarea"
574+
:examples $ []
560575
|first-line $ %{} :CodeEntry (:doc "|last message from error contains a line starts with \"data: \" and an extra error message. In order that JSON is parsed correctly, only first line is used now.")
561576
:code $ quote
562577
defn first-line (tt)
@@ -568,6 +583,7 @@
568583
> (.-length lines) 1
569584
js/console.warn "\"Droping some unexpected lines:" $ .!slice lines 1
570585
.-0 lines
586+
:examples $ []
571587
|get-anthropic-key! $ %{} :CodeEntry (:doc |)
572588
:code $ quote
573589
defn get-anthropic-key! () $ let
@@ -580,6 +596,7 @@
580596
js/localStorage.setItem "\"claude-key" v
581597
, v
582598
, key
599+
:examples $ []
583600
|get-deepinfra-key! $ %{} :CodeEntry (:doc |)
584601
:code $ quote
585602
defn get-deepinfra-key! () $ let
@@ -592,6 +609,7 @@
592609
js/localStorage.setItem "\"deepinfra-key" v
593610
, v
594611
, key
612+
:examples $ []
595613
|get-gemini-key! $ %{} :CodeEntry (:doc |)
596614
:code $ quote
597615
defn get-gemini-key! () $ let
@@ -604,6 +622,7 @@
604622
js/localStorage.setItem "\"gemini-key" v
605623
, v
606624
, key
625+
:examples $ []
607626
|get-openrouter-key! $ %{} :CodeEntry (:doc |)
608627
:code $ quote
609628
defn get-openrouter-key! () $ let
@@ -616,28 +635,35 @@
616635
js/localStorage.setItem "\"openrouter-key" v
617636
, v
618637
, key
638+
:examples $ []
619639
|json-pattern? $ %{} :CodeEntry (:doc |)
620640
:code $ quote
621641
defn json-pattern? (text)
622642
or (.!startsWith text "\"{") (.!startsWith text "\"[")
643+
:examples $ []
623644
|models-menu $ %{} :CodeEntry (:doc |)
624645
:code $ quote
625646
def models-menu $ [] (:: :item :gemini-flash "|Gemini Flash 2.5") (:: :item :gemini-flash-lite "|Gemini Flash Lite 2") (:: :item :gemini-pro "|Gemini Pro 2.5") (:: :item :flash-imagen "\"Flash Imagen") (:: :item :imagen-3 "\"Imagen 3") (:: :item :gemma "|Gemma 3 27b") (:: :item :openrouter/anthropic/claude-sonnet-4 "\"Openrouter Claude Sonnet 4") (:: :item :openrouter/anthropic/claude-opus-4 "\"Openrouter Claude Opus 4") (:: :item :openrouter/google/gemini-2.5-pro-preview "\"Openrouter Google Gemini 2.5 pro preview") (:: :item :openrouter/google/gemini-2.5-flash-preview-05-20 "\"Openrouter Google Gemini 2.5 flash preview") (:: :item :openrouter/openai/gpt-4o "\"Openrouter GPT 4o") (:: :item :openrouter/deepseek/deepseek-chat-v3-0324:free "\"Openrouter deepseek-chat-v3-0324:free") (:: :item :claude-3.7 "\"Claude 3.7") (:: :item :deepinfra "\"Deepinfra") (; :: :item :openrouter/anthropic/claude-3.7-sonnet:thinking "\"Openrouter Claude 3.7 Sonnet Thinking")
647+
:examples $ []
626648
|pattern-spaced-code $ %{} :CodeEntry (:doc |)
627649
:code $ quote
628650
def pattern-spaced-code $ noted "\"temp fix of nested code block" (&raw-code "\"/\\n\\s+```/g")
651+
:examples $ []
629652
|pick-model $ %{} :CodeEntry (:doc |)
630653
:code $ quote
631654
defn pick-model (variant)
632655
case-default variant "\"gemini-2.5-flash-preview-05-20" (:gemini-pro "\"gemini-2.5-pro-preview-06-05") (:gemini-pro-1.5 "\"gemini-1.5-pro") (:gemini-flash-lite "\"gemini-2.0-flash-lite") (:gemma "\"gemma-3-27b-it")
656+
:examples $ []
633657
|style-a-toggler $ %{} :CodeEntry (:doc |)
634658
:code $ quote
635659
defstyle style-a-toggler $ {}
636660
"\"&" $ {} (:cursor :pointer)
661+
:examples $ []
637662
|style-abort-close $ %{} :CodeEntry (:doc |)
638663
:code $ quote
639664
defstyle style-abort-close $ {}
640665
"\"&" $ {} (:vertical-align :top) (:font-size 10)
666+
:examples $ []
641667
|style-app-global $ %{} :CodeEntry (:doc |)
642668
:code $ quote
643669
defstyle style-app-global $ {}
@@ -647,36 +673,44 @@
647673
:background-color $ hsl 0 0 98
648674
"\"&:hover" $ {} (:color "\"#777")
649675
:background-color $ hsl 0 0 100
676+
:examples $ []
650677
|style-checkbox $ %{} :CodeEntry (:doc |)
651678
:code $ quote
652679
defstyle style-checkbox $ {}
653680
"\"&" $ {} (:cursor :pointer) (:user-select :none) (:font-size 13)
681+
:examples $ []
654682
|style-clear $ %{} :CodeEntry (:doc |)
655683
:code $ quote
656684
defstyle style-clear $ {}
657685
"\"&" $ {} (:opacity 0.4) (:padding "\"4px 8px") (:display :inline-block) (:height "\"24px")
686+
:examples $ []
658687
|style-code-content $ %{} :CodeEntry (:doc |)
659688
:code $ quote
660689
defstyle style-code-content $ {}
661690
"\"&" $ {} (:line-height "\"1.5") (:font-size 13)
691+
:examples $ []
662692
|style-image $ %{} :CodeEntry (:doc |)
663693
:code $ quote
664694
defstyle style-image $ {}
665695
"\"&" $ {} (:max-width "\"100%") (:align-self :flex-start) (:border-radius "\"6px")
666696
:border $ str "\"1px solid " (hsl 0 0 90)
697+
:examples $ []
667698
|style-md-content $ %{} :CodeEntry (:doc |)
668699
:code $ quote
669700
defstyle style-md-content $ {}
670701
"\"& .md-p" $ {} (:margin "\"16px 0") (:line-height "\"1.6")
702+
:examples $ []
671703
|style-message-area $ %{} :CodeEntry (:doc |)
672704
:code $ quote
673705
defstyle style-message-area $ {}
674706
"\"&" $ {} (:flex 2) (:overflow :scroll)
707+
:examples $ []
675708
|style-message-box $ %{} :CodeEntry (:doc |)
676709
:code $ quote
677710
defstyle style-message-box $ {}
678711
"\"&" $ {} (:width "\"100%") (:max-width 1200) (:right "\"50%") (:padding "\"8px") (:margin :auto) (:transition-duration "\"300ms") (; :transform "\"translate(50%,0)") (:transition-property "\"height")
679712
"\"&:focus-within" $ {} (:opacity 1) (; :transform "\"translate(50%,0)")
713+
:examples $ []
680714
|style-message-box-panel $ %{} :CodeEntry (:doc |)
681715
:code $ quote
682716
defstyle style-message-box-panel $ {}
@@ -686,10 +720,12 @@
686720
"\"&.focus-within" $ {}
687721
:background-color $ hsl 0 0 100 0.9
688722
:box-shadow $ str "\"0 0px 8px " (hsl 0 0 0 0.3)
723+
:examples $ []
689724
|style-message-list $ %{} :CodeEntry (:doc |)
690725
:code $ quote
691726
defstyle style-message-list $ {}
692727
"\"&" $ {} (:flex 2) (:padding "\"40px 16px 20vh 16px") (:width "\"100%") (:max-width 1200) (:margin :auto) (:position :relative)
728+
:examples $ []
693729
|style-more $ %{} :CodeEntry (:doc |)
694730
:code $ quote
695731
defstyle style-more $ {}
@@ -702,15 +738,18 @@
702738
:display :inline-flex
703739
"\"&:hover" $ {}
704740
:box-shadow $ str "\"1px 1px 4px " (hsl 0 0 0 0.2)
741+
:examples $ []
705742
|style-submit $ %{} :CodeEntry (:doc |)
706743
:code $ quote
707744
defstyle style-submit $ {}
708745
"\"&" $ {}
746+
:examples $ []
709747
|style-textbox $ %{} :CodeEntry (:doc |)
710748
:code $ quote
711749
defstyle style-textbox $ {}
712750
"\"&" $ {} (:border-radius 12) (:height "\"max(160px,20vh)") (:width "\"100%") (:transition-duration "\"320ms") (:border :none) (:background-color :transparent)
713751
"\"&.focus-within" $ {} (:height "\"max(240px,32vh)") (:border :none) (:box-shadow :none)
752+
:examples $ []
714753
|submit-message! $ %{} :CodeEntry (:doc |)
715754
:code $ quote
716755
defn submit-message! (cursor state prompt-text search? think? model d!) (hint-fn async)
@@ -742,6 +781,7 @@
742781
assoc :answer $ str @*text &newline &newline (str "\"Failed to load: " e)
743782
assoc :loading? false
744783
assoc :done? true
784+
:examples $ []
745785
:ns $ %{} :CodeEntry (:doc |)
746786
:code $ quote
747787
ns app.comp.container $ :require (respo-ui.css :as css)
@@ -766,26 +806,31 @@
766806
|chrome-extension? $ %{} :CodeEntry (:doc |)
767807
:code $ quote
768808
def chrome-extension? $ and (some? js/window.chrome) (some? js/window.chrome.runtime) (some? js/window.chrome.runtime.id)
809+
:examples $ []
769810
|dev? $ %{} :CodeEntry (:doc |)
770811
:code $ quote
771812
def dev? $ = "\"dev" (get-env "\"mode" "\"release")
813+
:examples $ []
772814
|site $ %{} :CodeEntry (:doc |)
773815
:code $ quote
774816
def site $ {} (:storage-key "\"msg-buffer")
817+
:examples $ []
775818
:ns $ %{} :CodeEntry (:doc |)
776819
:code $ quote (ns app.config)
777820
|app.main $ %{} :FileEntry
778821
:defs $ {}
779822
|*reel $ %{} :CodeEntry (:doc |)
780823
:code $ quote
781824
defatom *reel $ -> reel-schema/reel (assoc :base schema/store) (assoc :store schema/store)
825+
:examples $ []
782826
|dispatch! $ %{} :CodeEntry (:doc |)
783827
:code $ quote
784828
defn dispatch! (op)
785829
when
786830
and config/dev? $ not= op :states
787831
js/console.log "\"Dispatch:" op
788832
reset! *reel $ reel-updater updater @*reel op
833+
:examples $ []
789834
|listen-extension! $ %{} :CodeEntry (:doc |)
790835
:code $ quote
791836
defn listen-extension! ()
@@ -800,6 +845,7 @@
800845
model $ either (:model store) :gemini
801846
submit-message! cursor state0 content false false model dispatch!
802847
js/chrome.runtime.connect $ js-object (:name |mySidepanel)
848+
:examples $ []
803849
|main! $ %{} :CodeEntry (:doc |)
804850
:code $ quote
805851
defn main! ()
@@ -818,15 +864,18 @@
818864
dispatch! $ :: :hydrate-storage (parse-cirru-edn raw)
819865
if config/chrome-extension? $ listen-extension!
820866
println "|App started."
867+
:examples $ []
821868
|mount-target $ %{} :CodeEntry (:doc |)
822869
:code $ quote
823870
def mount-target $ js/document.querySelector |.app
871+
:examples $ []
824872
|persist-storage! $ %{} :CodeEntry (:doc |)
825873
:code $ quote
826874
defn persist-storage! ()
827875
println "\"Saved at" $ .!toISOString (new js/Date)
828876
js/localStorage.setItem (:storage-key config/site)
829877
format-cirru-edn $ :store @*reel
878+
:examples $ []
830879
|reload! $ %{} :CodeEntry (:doc |)
831880
:code $ quote
832881
defn reload! () $ if (nil? build-errors)
@@ -835,9 +884,11 @@
835884
reset! *reel $ refresh-reel @*reel schema/store updater
836885
hud! "\"ok~" "\"Ok"
837886
hud! "\"error" build-errors
887+
:examples $ []
838888
|render-app! $ %{} :CodeEntry (:doc |)
839889
:code $ quote
840890
defn render-app! () $ render! mount-target (comp-container @*reel) dispatch!
891+
:examples $ []
841892
:ns $ %{} :CodeEntry (:doc |)
842893
:code $ quote
843894
ns app.main $ :require
@@ -859,6 +910,7 @@
859910
:states $ {}
860911
:cursor $ []
861912
:model nil
913+
:examples $ []
862914
:ns $ %{} :CodeEntry (:doc |)
863915
:code $ quote (ns app.schema)
864916
|app.updater $ %{} :FileEntry
@@ -877,6 +929,7 @@
877929
assoc store :model :gemini
878930
assoc store :model :anthropic
879931
_ $ do (eprintln "\"unknown op:" op) store
932+
:examples $ []
880933
:ns $ %{} :CodeEntry (:doc |)
881934
:code $ quote
882935
ns app.updater $ :require

deps.cirru

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -4,6 +4,6 @@
44
|Respo/reel.calcit |main
55
|Respo/respo-markdown.calcit |0.4.11
66
|Respo/respo-ui.calcit |0.6.3
7-
|Respo/respo.calcit |0.16.16
7+
|Respo/respo.calcit |0.16.18
88
|calcit-lang/lilac |main
99
|calcit-lang/memof |main

package.json

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,11 @@
11
{
22
"dependencies": {
3-
"@calcit/procs": "^0.9.18",
4-
"@google/genai": "^1.12.0",
5-
"axios": "^1.11.0",
3+
"@calcit/procs": "^0.9.20",
4+
"@google/genai": "^1.24.0",
5+
"axios": "^1.12.2",
66
"cirru-color": "^0.2.4",
7-
"copy-text-to-clipboard": "^3.2.0",
8-
"openai": "^5.12.0"
7+
"copy-text-to-clipboard": "^3.2.2",
8+
"openai": "^6.3.0"
99
},
1010
"devDependencies": {
1111
"bottom-tip": "^0.1.5",

0 commit comments

Comments
 (0)