minikomi

background = 181c11
foreground = ffffff

quick-terminal-position=right
quick-terminal-screen=main
quick-terminal-animation-duration=0
macos-option-as-alt=true
keybind = global:cmd+shift+enter=toggle_quick_terminal

minikomi

(ns co.poyo.wordleclj.core
  (:require [clojure.java.io :as io]
            [clojure.string :as str]))

(def word-list
  (->> "wordle-answers-alphabetical.txt"
       io/resource
       slurp
       str/split-lines
       (map str/trim)

minikomi

[["downloads-20141229.edn" [["??" "??"]]]
 ["downloads-20200208.edn"
  [["?marker=org.clojars.thobbs" "hector-test"]
   ["?marker=im.chit" "hara.protocol.constructor"]
   ["?marker=org.clojars.kostafey" "clucy"]
   ["?marker=com.ryanmcg" "stefon"]
   ["?marker=clj-genex2" "clj-genex2"]
   ["?marker=charset" "charset"]
   ["?marker=healthunlocked" "matrix-market"]
   ["?marker=funcool" "postal"]

minikomi

function midway-docker
    set tmpfile (mktemp /tmp/midway-docker.XXXXXXXX)
    head -n $argv[1] $argv[2] > $tmpfile
    docker build . -f $tmpfile -t "temp-build"
    docker run --entrypoint /bin/bash -it "temp-build"
end

minikomi

(defmacro let-stop [bindings & body]
  (if (some #{'*stop*} bindings)
    (let [stopped-bindings
          (->> bindings
               (take-while #(not= '*stop* %))
               vec)
          caught-symbols
          (->> stopped-bindings
               (partition 2)
               (map #(vector (keyword (str (first %))) (first %)))

minikomi

(ns lightbulbs.app.core
  (:require [reagent.dom :as rdom]
            [reagent.core :as r]))

(defn gen-default-state [n]
  {:lightbulbs (mapv #(vector % false) (vec (shuffle (range n))))
   :snapshots []})

(def state
  (r/atom (gen-default-state 8)))

minikomi

Keybase proof

I hereby claim:

• I am minikomi on github.
• I am minikomi (https://keybase.io/minikomi) on keybase.
• I have a public key ASBtI1LN4RscD0BT18FGe1O1YsbfuV06nQUSsNvxMZ-Nbgo

To claim this, I am signing this object:

minikomi

quotes = [q.split("\n") for q in txt.split("==========\n")]

import re
from datetime import datetime
import json

re_page = re.compile("- Your Highlight on page ([\d\-]+)")
re_loc = re.compile(".*Location ([\d\-]+)")
re_date = re.compile("Added on (.*[AM|PM])")

minikomi

Process:               Brogue [359]
Path:                  /Applications/Brogue.app/Contents/MacOS/Brogue
Identifier:            com.Brogue
Version:               1.7.5 (0)
Code Type:             X86-64 (Native)
Parent Process:        ??? [1]
Responsible:           Brogue [359]
User ID:               501

Date/Time:             2019-08-13 20:08:26.626 +0900

minikomi

(defn get-dep-graph [src-paths]
  (let [src-files
        (apply set/union
               (map (comp #(ns-find/find-clojure-sources-in-dir %)
                          io/file)
                    src-paths))
        tracker (ns-file/add-files {} src-files)
        dep-graph (tracker ::ns-track/deps)]
    dep-graph))