qtrfeast

Check out README.md to get started editing Clojure with Emacs.

hiredman

(alter-var-root #'require
                (fn [o-require]
                  (fn [& args]
                    (let [{opts true nses false} (group-by keyword? args)]
                      (doall
                       (map #(.join %)
                            (doall
                             (for [ns nses]
                               (doto (Thread. #(apply o-require ns opts))
                                 .start)))))))))

daveray

Links for essays ref'd in http://blog.fogus.me/2009/03/11/seven-books/

• On the Criteria to Be Used in Decomposing Systems Into Modules – David Parnas
• A Note On Distributed Computing – Jim Waldo, Geoff Wyant, Ann Wollrath, Sam Kendall
• The Next 700 Programming Languages – P. J. Landin
• Can Programming Be Liberated from the von Neumann Style? – John Backus
• Reflections on Trusting Trust – Ken Thompson
• Lisp: Good News, Bad News, How to Win Big – Richard Gabriel
• An Experimental Evaluation of the Assumption of Independence in Multiversion Programming – John Knight and Nancy Leveson
• [Arguments and Results –

CampingScorpion

;; Example:

;; (doseq-indexed idx [name names]
;;   (println (str idx ". " name)

(defmacro doseq-indexed [index-sym [item-sym coll] & body]
  `(let [idx-atom# (atom 0)]
     (doseq [~item-sym ~coll]
       (let [~index-sym (deref idx-atom#)]

brandonb927

#!/bin/sh

###
# SOME COMMANDS WILL NOT WORK ON macOS (Sierra or newer)
# For Sierra or newer, see https://github.com/mathiasbynens/dotfiles/blob/master/.macos
###

# Alot of these configs have been taken from the various places
# on the web, most from here
# https://github.com/mathiasbynens/dotfiles/blob/5b3c8418ed42d93af2e647dc9d122f25cc034871/.osx

MohamedAlaa

tmux shortcuts & cheatsheet

start new:

tmux

start new with session name:

tmux new -s myname

henrik

tmux cheatsheet

As configured in my dotfiles.

start new:

tmux

start new with session name:

unclebob

(defn commatize [n]
  (if (nil? n)
    ""
    (let [s (str n)]
      (apply str
        (reverse (drop-last
                   (interleave
                     (reverse s)
                     (take (count s) (flatten (repeat [nil nil \,]))))))))))

drj42

Org-mode Org-mode Reference Card

Org mode reference card

Created from the plain text reference card on orgmode.org Download this file, and open it in Emacs org-mode!

Licenser

(defn map-keys [f m & [ks]]
  (loop [new-map (transient {}) ks ks]
    (if (empty? ks)
      (persistent! new-map)
      (let [[k & ks] ks]
        (recur (assoc! new-map k (f (m k))) ks)))))