Skip to content

Instantly share code, notes, and snippets.


Oliver George olivergeorge

  • Tasmania, Australia
View GitHub Profile
View router.cljs
(def views
{:some-view SomeView
:another-view AnotherView})
(def factories
(map om/factory (vals views)))
(defui Router
static om/Ident
(ident [this {:keys [route]}]
leobm / gist:6061734
Created Jul 23, 2013
break point in clojure - A macro from 《the joy of clojure》 for debugging:
View gist:6061734
(defn contextual-eval [ctx expr]
`(let [~@(mapcat (fn [[k v]] [k `'~v]) ctx)]
(defmacro local-context []
(let [symbols (keys &env)]
(zipmap (map (fn [sym] `(quote ~sym)) symbols) symbols)))
(defn readr [prompt exit-code]
(let [input (clojure.main/repl-read prompt exit-code)]
(if (= input ::tl)
View clean_utm.js
// Clean up all those invasive and ugly utm_ parameters, so you can paste a url.
// (will reload the page, be warned)
var qs ='&'),
newqs = [];
for (var i = 0; i < qs.length; i++) {
if (qs[i].slice(0,4)!='utm_') {
View gist:476058
from django.core.exceptions import ValidationError
from django.db.models import Field, CharField
__all__ = ['MultiColumnField']
from hashlib import md5
except ImportError:
from md5 import new as md5