Skip to content

Instantly share code, notes, and snippets.

@dysinger
Created December 9, 2009 00:33
Show Gist options
  • Select an option

  • Save dysinger/252128 to your computer and use it in GitHub Desktop.

Select an option

Save dysinger/252128 to your computer and use it in GitHub Desktop.
user> (def ls (.list (java.io.File. (System/getProperty "user.dir"))))
#'user/ls
user> (doseq [file ls] (println file))
#amqp.clj#
.#amqp.clj
amqp
amqp.clj
amqp.clj~
hello
nil
user> (System/setProperty "user.dir" "/tmp")
"/Users/tim/src/sa-safe/amqp/src/main/clojure/sonian/archive"
user> (def ls (.list (java.io.File. (System/getProperty "user.dir"))))
#'user/ls
user> (doseq [file ls] (println file))
.ksda.1F5
aprSCBCi4
apruh7Nq0
CrashReportCopyLock-Tim Dysinger?s iPhone
ics249
ics3777
ics4390
ics5136
icssuis501
launch-jfeFK0
launch-tqG0Iy
launch-ZWw3zE
launchd-203.o13rft
MobileDevice.log
MobileSync.lock.48b29d8de9356efac700e26b8a3ecf281107fb7e
rabbit-sasl.log
rabbit.log
rabbitmq-rabbit-mnesia
ssh-Q4qq6TTwlv
nil
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment