🎄 Initial commit

Author: mk

.gitignore

@@ -0,0 +1,21 @@
+.DS_Store
+.cache/
+.clerk/
+.cpcache/
+.lsp/
+node_modules
+notebooks/scratch*
+/public/js/
+/.shadow-cljs/
+/target/
+.idea/
+clerk.iml
+public/girouette.css
+public/images/
+yarn.lock
+*~
+.work
+/build
+/public/build
+.nrepl-port
+.clj-kondo/marick

README.md

@@ -0,0 +1,20 @@
+# 🎄 Advent of Clerk
+
+A template repo for folks wanting to do [Advent of
+ Code](https://adventofcode.com) with [Clerk](https://clerk.vision).
+
+
+## Usage
+
+To play with this, you need to have [Clojure
+installed](https://clojure.org/guides/install_clojure), then run:
+
+``` shell
+clj -M:nextjournal/clerk nextjournal.clerk/serve! --watch-paths src --port 7878 --browse
+```
+
+This will start the Clerk webserver on port 7878 and watch the `src/`
+directory for changes and open Clerk in your browser.
+
+Open one of the files there, e.g. `day_01.clj`, make a change and save
+it. You should then see these changes reflected in the browser.

deps.edn

@@ -0,0 +1,7 @@
+{:paths ["dev" "src" "resources"]
+ :deps {org.clojure/clojure {:mvn/version "1.11.1"}
+        io.github.nextjournal/clerk {:git/sha "9c51111dcfead67c52bf3d2cd0facaa415312614"}
+        org.babashka/cli {:mvn/version "0.5.40"}}
+ 
+ :aliases {:nextjournal/clerk {:exec-fn nextjournal.clerk/build!
+                               :exec-args {:paths-fn advent-of-clerk.index/build-paths}}}}

dev/user.clj

@@ -0,0 +1,13 @@
+(ns user
+  (:require [advent-of-clerk.index :as index]
+            [nextjournal.clerk :as clerk]
+            [clojure.string :as str]
+            [babashka.fs :as fs]))
+
+
+(comment
+  (clerk/build! {:index "src/advent_of_clerk/index.clj"
+                 :paths (index/build-paths)
+                 :browse true}))
+
+

src/advent_of_clerk/day_00.clj

@@ -0,0 +1,6 @@
+;; # 🎄 Advent of Clerk: Day 0
+(ns advent-of-clerk.day-0
+  (:require [nextjournal.clerk :as clerk]))
+
+;; This file is meant to be deleted when you start. It only exists to
+;; demo that files with contents are included in the build.

src/advent_of_clerk/day_01.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 1
+(ns advent-of-clerk.day-1
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_02.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 2
+(ns advent-of-clerk.day-2
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_03.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 3
+(ns advent-of-clerk.day-3
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_04.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 4
+(ns advent-of-clerk.day-4
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_05.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 5
+(ns advent-of-clerk.day-5
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_06.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 6
+(ns advent-of-clerk.day-6
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_07.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 7
+(ns advent-of-clerk.day-7
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_08.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 8
+(ns advent-of-clerk.day-8
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_09.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 9
+(ns advent-of-clerk.day-9
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_10.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 10
+(ns advent-of-clerk.day-10
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_11.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 11
+(ns advent-of-clerk.day-11
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_12.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 12
+(ns advent-of-clerk.day-12
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_13.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 13
+(ns advent-of-clerk.day-13
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_14.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 14
+(ns advent-of-clerk.day-14
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_15.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 15
+(ns advent-of-clerk.day-15
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_16.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 16
+(ns advent-of-clerk.day-16
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_17.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 17
+(ns advent-of-clerk.day-17
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_18.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 18
+(ns advent-of-clerk.day-18
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_19.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 19
+(ns advent-of-clerk.day-19
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_20.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 20
+(ns advent-of-clerk.day-20
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_21.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 21
+(ns advent-of-clerk.day-21
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_22.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 22
+(ns advent-of-clerk.day-22
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_23.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 23
+(ns advent-of-clerk.day-23
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/day_24.clj

@@ -0,0 +1,3 @@
+;; # 🎄 Advent of Clerk: Day 24
+(ns advent-of-clerk.day-24
+  (:require [nextjournal.clerk :as clerk]))

src/advent_of_clerk/index.clj

@@ -0,0 +1,35 @@
+;; # 🎄 Advent of Clerk
+
+;; [Advent of Code](https://adventofcode.com) with
+;; [Clerk](https://clerk.vision).
+(ns advent-of-clerk.index
+  {:nextjournal.clerk/visibility {:code :hide :result :hide}}
+  (:require [babashka.fs :as fs]
+            [clojure.string :as str]
+            [nextjournal.clerk :as clerk]))
+
+#_(days-with-contents)
+
+(defn build-paths
+  "Computes the paths to build by looking for files in
+  `src/advent_of_clerk` and filtering out unmodified templates (files
+  with less than four lines)."
+  []
+  (into []
+        (keep (fn [day]
+                (let [f (fs/file "src" "advent_of_clerk" (format "day_%s.clj" (cond->> day (<= day 10) (str "0"))))]
+                  (when (and (.exists f)
+                             (< 3 (count (str/split-lines (slurp f)))))
+                    (str f)))))
+        (range 25)))
+
+
+#_(build-paths)
+
+{:nextjournal.clerk/visibility {:result :show}}
+
+^::clerk/no-cache
+(clerk/html (into [:ul] (mapv (fn [path]
+                                (when-let [day (second (re-matches #".*day_(\d+).clj" path))]
+                                  [:li [:a {:href (clerk/doc-url path)} "Day " day]])) (build-paths))))
+