| -- Open a SQLite shell by issuing the command below | |
| -- sqlite3 ~/Library/Preferences/com.apple.LaunchServices.QuarantineEventsV* | |
| select LSQuarantineDataURLString from LSQuarantineEvent order by LSQuarantineTimeStamp asc limit 1; | |
| -- For me, it's GNU Emacs. | |
| -- sqlite> select LSQuarantineDataURLString from LSQuarantineEvent order by LSQuarantineTimeStamp asc limit 1; | |
| -- http://bandwidth.porkrind.org/emacs-builds/Emacs-24.2-universal-10.6.8.dmg |
Use magit-ediff or 'e' on an unmerged item to resolve merge conflicts with ediff. Magit will set up an ediff with three buffers A, B and C. A and B are the original (conflicting) files, and C is the conflicted merge.
Use 'n'/'p' to move to the next/previous conflict, use 'a'/'b' to choose which changes (those in a A or B) should be the ones to keep in the merged file.
You can always just switch to buffer C and edit what the merged version should look like.
| (ns flp | |
| "Function-level programming a la Backus; see | |
| http://www.stanford.edu/class/cs242/readings/backus.pdf" | |
| (:refer-clojure :exclude [/])) | |
| ;;; Functional Forms - combine existing functions to form new ones. | |
| (def ^{:doc "Composition"} ° comp) | |
| (defn / [f] |
| (ns hierarchy.core | |
| (:refer-clojure :exclude [==]) | |
| (:use [clojure.core.logic])) | |
| (def order [:domain :kingdom :phylum :class :order :family :genus :species]) | |
| (def homo-sapiens | |
| {:domain :eukarya | |
| :kingdom :animalia-metazoa | |
| :phylum :chordata |
| (use 'backtype.storm.clojure) | |
| (use 'backtype.storm.config) | |
| (require '[backtype.storm [thrift :as thrift]]) | |
| (import 'storm.starter.spout.RandomSentenceSpout) | |
| (import 'backtype.storm.LocalCluster) | |
| (defboltfull suffix-bolt ["word"] | |
| :params [suffix] | |
| :let [conf-state (atom nil)] | |
| :prepare ([conf context collector] |
| ; A solution to https://4clojure.com/problem/102 that doesn't involve cl-format | |
| #(clojure.string/replace % #"-." (fn [m] (-> m last Character/toUpperCase str))) |
| (require 'iimage) | |
| (autoload 'iimage-mode "iimage" "Support Inline image minor mode." t) | |
| (autoload 'turn-on-iimage-mode "iimage" "Turn on Inline image minor mode." t) | |
| (add-to-list 'iimage-mode-image-regex-alist '("@startuml\s+\\(.+\\)" . 1)) | |
| ;; Rendering plantuml | |
| (defun plantuml-render-buffer () | |
| (interactive) | |
| (message "PLANTUML Start rendering") | |
| (shell-command (concat "java -jar ~/Downloads/plantuml.jar " |
