| ;; This is free and unencumbered software released into the public domain. | |
| ;; | |
| ;; Anyone is free to copy, modify, publish, use, compile, sell, or | |
| ;; distribute this software, either in source code form or as a compiled | |
| ;; binary, for any purpose, commercial or non-commercial, and by any | |
| ;; means. | |
| ;; | |
| ;; In jurisdictions that recognize copyright laws, the author or authors | |
| ;; of this software dedicate any and all copyright interest in the | |
| ;; software to the public domain. We make this dedication for the benefit |
| (ns webdav | |
| (:require [clojure.string :as str] | |
| [clojure.data.xml :as xml] | |
| [org.httpkit.server :as hk-server])) | |
| ;; add the XML namespace that we'll use later | |
| (xml/alias-uri 'd "DAV:") | |
| (defn dissoc-in | |
| "Should be in the standard library..." |
https://day8.github.io/re-frame/EffectfulHandlers/
at any one time, the value in app-db is the result of performing a reduce over the entire collection of events dispatched in the app up until that time. The combining function for this reduce is the set of registered event handlers.
A minimal example of creating a (mostly) working FUSE filesystem using Clojure. NOTE: I have only tested this with OSX, and it assumes you have already installed libfuse.
Create an empty directory at /tmp/meld to serve as your mount point,
put these files in a directory called meld, then:
| # Fetch latest configuration: | |
| */5 * * * * cd /home/ubuntu/dogsheep-config && python3 git_pull_and_run_scripts.py . && sudo python3 ensure_symlinks.py files-to-symlink | |
| # Goodreads | |
| 46 * * * * cd /home/ubuntu && /home/ubuntu/datasette-venv/bin/goodreads-to-sqlite books goodreads.db -a auth.json | |
| 1,11,21,31,41,51 * * * * /home/ubuntu/datasette-venv/bin/twitter-to-sqlite user-timeline /home/ubuntu/twitter.db -a /home/ubuntu/auth.json --since | |
| 2,7,12,17,22,27,32,37,42,47,52,57 * * * * run-one /home/ubuntu/datasette-venv/bin/twitter-to-sqlite home-timeline /home/ubuntu/timeline.db -a /home/ubuntu/auth.json --since | |
| 4,14,24,34,44,54 * * * * run-one /home/ubuntu/datasette-venv/bin/twitter-to-sqlite mentions-timeline /home/ubuntu/twitter.db -a /home/ubuntu/auth.json --since |
| #!/usr/bin/env spire | |
| ;; spin up a digital ocean droplet | |
| ;; build latest acmetool | |
| ;; patch and update debian package | |
| ;; download acmetool binary and new package | |
| ;; destroy droplet | |
| ;; requirements: | |
| ;; spire 0.1.0-alpha.15 or above |
| (ns js-fetch | |
| (:require [promesa.core :as p] | |
| [clojure.string :as str]) | |
| (defn serialize | |
| [content-type data] | |
| (pr-str data)) | |
| (defn deserialize | |
| [content-type text] |
| #!/usr/bin/env bash | |
| #! top-of-file comments can be written using more #! lines, which | |
| #! is a valid comment in both clojure and bash | |
| ":";# alternately this works too | |
| #! The construction below uses cross-language syntactic hackery to | |
| #! specify the -Sdeps arg in a part of the file that's interpreted | |
| #! by clojure as clojure syntax (i.e., not a line comment), so it |
A beginner-friendly REPL that combines
I made a documentation generator that cashes in on Clojure's dynamism. See the play-cljs docs (a ClojureScript game library) for an example of its output.
Like many of you, I've often wondered what my final regret will be on my deathbed. My best guess came to me in a dream recently. I was walking across the charred earth of an apocalyptic future world, maneuvering around the remains of the less fortunate. I was startled to find a young girl, barely holding onto her life. She murmured something to me. I asked her to repeat it, and she said more loudly: "I...wish your Clojure projects didn't have such crappy documentation."
