mtnygard

Emacs in Org Configuration

This is a file in org-mode. It contains a mix (a tangle) of explanatory text and source blocks. The source blocks aren’t used directly here, but calling the following function will emit the file

The `header-args` property on line 2 defines where to write the “tangled” output file. The header args are injected into every code block. (Though they can be overridden per block by just specifying a

mtnygard

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

mtnygard

;; 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

mtnygard

#!/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

mtnygard

{: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",

mtnygard

gcloud compute instances list --format "table[no-heading](networkInterfaces[0].accessConfigs[0].natIP, name)"

mtnygard

(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"]

mtnygard

@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

mtnygard

/*
 * 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

mtnygard

(defn response
  ([status body]
   {:status  status
    :headers {}
    :body    body}))

(defmacro http-status [code sym]
  `(def ~sym (partial response ~code)))

(defmacro http-statuses [& pairs]