Person nick-orton

## get-classpath.clj
(. System getProperty "java.class.path")

## zsh_vim_butter.env
alias :e="vim"

## echo.classpath.xml
<echo message="${java.class.path}"/>

## appengine-setup-for-clojure.clj
(ns com.freiheit.clojure.appengine.appengine-local
  (:use
   [compojure.http routes servlet helpers]
   clojure.contrib.test-is
   compojure.server.jetty
   [clojure.contrib def str-utils duck-streams])
  (:require
   [clojure.contrib.logging :as log])
  (:import
   [com.google.appengine.api.labs.taskqueue.dev LocalTaskQueue]

## git-svn.sh
git svn clone --stdlayout svn+ssh://my-repo.up.to.but.not/including-trunk/ target-dir

## git-proxy.sh
export http_proxy=http://my.proxy.server.com:80

## test.clj
(use 'clojure.test)

(defmacro isnt [thing]
  `(is (not ~thing)))

## arrow.clj
(lambda3
  (lambda2 (lambda1 arg1) arg2))

(-> (lambda1 arg1)
    (lambda2 arg2)
    (lambda3))

## pop-if.clj
(defn pop-if
  [predicate stack]
  (if (predicate (first stack))
      (rest stack)
      stack))

## deftype-doc-string.clj

(deftype TestDeftypeDocstring
  "This doc string does not appear on the left hand side of the uberdoc on Marginalia 0.5.1"
  [state]
  Object
    (toString [self]
      (str "Bag: " (:state self))))
	(ns com.freiheit.clojure.appengine.appengine-local
	(:use
	[compojure.http routes servlet helpers]
	clojure.contrib.test-is
	compojure.server.jetty
	[clojure.contrib def str-utils duck-streams])
	(:require
	[clojure.contrib.logging :as log])
	(:import
	[com.google.appengine.api.labs.taskqueue.dev LocalTaskQueue]
	(use 'clojure.test)

	(defmacro isnt [thing]
	`(is (not ~thing)))
	(lambda3
	(lambda2 (lambda1 arg1) arg2))

	(-> (lambda1 arg1)
	(lambda2 arg2)
	(lambda3))
	(defn pop-if
	[predicate stack]
	(if (predicate (first stack))
	(rest stack)
	stack))

	(deftype TestDeftypeDocstring
	"This doc string does not appear on the left hand side of the uberdoc on Marginalia 0.5.1"
	[state]
	Object
	(toString [self]
	(str "Bag: " (:state self))))