demo added

README.md

@@ -9,3 +9,12 @@
 
 
 
+# demo
+
+
+```
+cd demo
+clj -X:docy
+```
+
+http://localhost:8080/docy

demo/deps.edn

@@ -0,0 +1,20 @@
+{:paths ["src"
+         "resources" ; extension data
+         ]
+ :deps
+ {org.clojure/clojure    {:mvn/version "1.11.3"}
+  org.pinkgorilla/goldly-docs {:mvn/version "0.8.34"}
+  io.github.pink-gorilla/docy {:local/root ".." :deps/manifest :deps}
+  ; libs we want to document
+  scicloj/tablecloth {:mvn/version "7.021"} ; brings techml-dataset
+  }
+ :aliases
+ {:docy {; usecase: clj -X:docy
+         :exec-fn modular.system/start!
+         :exec-args {:profile "jetty"
+                     :config ["config.edn"]
+                     :services "services.edn"}}
+
+;
+  }}
+

demo/src/config.edn

@@ -0,0 +1,34 @@
+{:reval {:rdocument  {:storage-root "target/webly/public/rdocument/"
+                     :url-root "/api/rdocument/file/"}
+        :collections {:study [:clj "quanta/notebook/study/"]
+                      :quanta-docs [:clj "quanta/notebook/docs/"]
+                      }}
+
+:keybindings [{:kb "alt-g k",
+               :handler [:palette/show],
+               :desc "Keybindings dialog"}
+              {:kb "esc",
+               :handler [:modal/close],
+               :desc "Dialog Close"}
+              {:kb "alt-g t",
+               :handler [:reframe10x-toggle],
+               :desc "10x visibility toggle"}
+
+                ;{:kb "up"   :handler [:arrow-up]    :desc "Codemirror Key Up"} ; :scope :codemirror
+                ;{:kb "down" :handler [:arrow-down] :desc "Codemirror Key Down"} :scope :codemirror
+              {:kb "shift-enter" :handler [:codemirror-active/completion-apply]  :desc "applies auto completion"}
+              {:kb "ctrl-space"  :handler [:codemirror/completion-get]     :desc "Show possible auto-completions"}
+                ; {:spec "enter"    :handler [:completion/clear]          :key ::clear}
+                ; {:spec "ctrl"     :handler [:completion/show-all false] :scope :global :key ::show-all-hide}
+              {:kb "alt-g c"     :handler [:clojuredocs]               :desc "Look up the symbol under the cursor in ClojureDocs"}
+
+                ; eval
+              {:kb "alt-shift-enter"     :handler [:notebook/evaluate-all] :desc "Evaluate all segments."}
+              {:kb "ctrl-shift-enter" :handler [:notebook/evaluate-all]         :desc "Evaluate all segments"}
+              {:kb "ctrl-enter" :handler [:repl/eval-expression]               :desc "Evaluate the highlighted segment"}]
+
+:docy [; external 
+       tablecloth.api
+       ]
+
+}

demo/src/services.edn

@@ -0,0 +1,46 @@
+ {:modular (modular.system/modular-env)  ; {:profile "jetty"  :config ["demo.edn" "secrets.edn"]}
+ :components
+ {:config {:start (modular.config/load-config! (:config #ref [:modular]))}
+
+  :exts {:start (extension/discover)}
+
+  :timbre {:start (modular.log/timbre-config!
+                   (:timbre/clj (deref (clip/ref :config))))}
+
+  ; empty map means no users are configured, so always permissioned.
+  :permission {:start (modular.permission.core/start-permissions {})}
+
+  :clj-service {:start (clj-service.core/start-clj-services
+                        (clip/ref :permission)
+                        (clip/ref :exts))}
+
+  :reval {:start (reval.core/start-reval
+                  {:config (:reval (deref (clip/ref :config)))
+                   :clj  (clip/ref :clj-service)
+                   :reval-role nil})}
+
+  :webly {:start (webly.app.app/start-webly
+                  (clip/ref :exts)
+                  (deref (clip/ref :config))
+                  (:profile #ref [:modular]))
+          :stop (webly.app.app/stop-webly this)}
+
+  :nrepl {:start (nrepl.server/start-server
+                  :bind "0.0.0.0"
+                  :port 9100
+                  :middleware cider.nrepl.middleware/cider-middleware
+                  :handler cider.nrepl/cider-nrepl-handler)
+          :stop (.close this)}
+
+  ;; DOCY
+
+  :docy {:start (docy.core/start-docy
+                 {:exts (clip/ref :exts)
+                  :clj (clip/ref :clj-service)
+                  :role nil
+                  :namespaces (:docy (deref (clip/ref :config)))})}
+
+
+
+;
+  }}