Mercurial > rlm

diff src/rlm/identify.clj @ 0:78a630e650d2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
initial import
author Robert McIntyre <rlm@mit.edu>
date Tue, 18 Oct 2011 00:57:08 -0700
parents
children
line wrap: on
line diff
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/rlm/identify.clj	Tue Oct 18 00:57:08 2011 -0700
     1.3 @@ -0,0 +1,10 @@
     1.4 +(ns rlm.identify
     1.5 +  "I want to be able to tell what computer I'm using.
     1.6 +   I do this with a magic file."
     1.7 +  {:author "Robert McIntyre"}
     1.8 +  (use [clojure [string :only [trim-newline]]]))
     1.9 +
    1.10 +(def magic-file "/home/r/.identify-computer")
    1.11 +
    1.12 +(defn identify []
    1.13 +  (trim-newline (slurp magic-file)))