GitHub Issues as org-agenda TODOs w/ links & searchable/filterable labels
gh issue list --limit 10000 --json number,title,url,labels \
| jq -r '.[]|"** TODO [["+.url+"]["+(.number|tostring)+"]] "+.title+" "+":"+(.labels|map(.name)|join(":"))+":"' \
| sed 's|::||g'
Credit to @dysinger
| ;; A Working Thing (singleton) | |
| (defsc Thing [this {:thing/keys [label contents] :as props}] | |
| {:query [:thing/label :thing/contents] | |
| :ident (fn [_] [:component/id :thing]) | |
| :initial-state (fn [{:keys [label contents]}] | |
| {:thing/label label :thing/contents contents})} | |
| (div :.ui.container.segment | |
| (h3 (str "Thing " label)) | |
| (dom/input {:value contents |
| #!/bin/bash | |
| # URL of the Launchpad mirror list | |
| MIRROR_LIST=https://launchpad.net/ubuntu/+archivemirrors | |
| # Set to the architecture you're looking for (e.g., amd64, i386, arm64, armhf, armel, powerpc, ...). | |
| # See https://wiki.ubuntu.com/UbuntuDevelopment/PackageArchive#Architectures | |
| ARCH=$1 | |
| # Set to the Ubuntu distribution you need (e.g., precise, saucy, trusty, ...) | |
| # See https://wiki.ubuntu.com/DevelopmentCodeNames |
| {:clojure.main/message | |
| "Execution error (NoSuchFileException) at sun.nio.fs.UnixException/translateToIOException (UnixException.java:92).\n/root/.gitlibs/libs/org.clojure/spec-alpha2/2f84e3a37cab76d44c58785ff4481597429bc1d3/${project.basedir}/src/main/java\n", | |
| :clojure.main/triage | |
| {:clojure.error/class java.nio.file.NoSuchFileException, | |
| :clojure.error/line 92, | |
| :clojure.error/cause | |
| "/root/.gitlibs/libs/org.clojure/spec-alpha2/2f84e3a37cab76d44c58785ff4481597429bc1d3/${project.basedir}/src/main/java", | |
| :clojure.error/symbol | |
| sun.nio.fs.UnixException/translateToIOException, | |
| :clojure.error/source "UnixException.java", |
| gcloud compute instances list --format "table[no-heading](networkInterfaces[0].accessConfigs[0].natIP, name)" |
| (defn lein-deps->deps-map [deps-vector] | |
| (reduce merge {} | |
| (for [d deps-vector | |
| :let [[prj mvn-version & _] d]] | |
| {prj {:mvn/version mvn-version}}))) | |
| (def d '[[org.clojure/clojure "1.9.0-alpha13"] | |
| [org.clojure/core.async "0.2.391"] |
| @echo off | |
| winget install Dropbox.Dropbox | |
| winget install Canonical.Ubuntu | |
| winget install Axosoft.GitKraken | |
| winget install Docker.DockerDesktop | |
| winget install 7zip.7zip | |
| winget install Git.Git | |
| winget install GitExtensionsTeam.GitExtensions | |
| winget install Google.Chrome | |
| winget install Microsoft.PowerToys |
| /* | |
| * Export View to Markdown | |
| * | |
| * Requires jArchi - https://www.archimatetool.com/blog/2018/07/02/jarchi/ | |
| * | |
| * Markdown - https://www.markdownguide.org/ | |
| * | |
| * Version 2: Updated to support Diagram Groups | |
| * Version 2.1: Add check for Selected View | |
| * Version 2.2: Change to regex, added date of export |
| (defn response | |
| ([status body] | |
| {:status status | |
| :headers {} | |
| :body body})) | |
| (defmacro http-status [code sym] | |
| `(def ~sym (partial response ~code))) | |
| (defmacro http-statuses [& pairs] |
| (defn multimethod-selector | |
| "Returns a generator that picks one dispatch value from the known | |
| dispatch values of a multimethod. Defers the lookup of dispatch | |
| values until sampling time, so any defmethods evaluated after the | |
| generator is created may still be selected." | |
| [s] | |
| #(sgen/bind | |
| (sgen/int) | |
| (fn [i] | |
| (let [ms (keys (methods s))] |