Mercurial > rlm
comparison src/rlm/identify.clj @ 0:78a630e650d2
initial import
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Tue, 18 Oct 2011 00:57:08 -0700 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:78a630e650d2 |
---|---|
1 (ns rlm.identify | |
2 "I want to be able to tell what computer I'm using. | |
3 I do this with a magic file." | |
4 {:author "Robert McIntyre"} | |
5 (use [clojure [string :only [trim-newline]]])) | |
6 | |
7 (def magic-file "/home/r/.identify-computer") | |
8 | |
9 (defn identify [] | |
10 (trim-newline (slurp magic-file))) |