Skip to content

Commit

Permalink
Two more to write
Browse files Browse the repository at this point in the history
  • Loading branch information
tebeka committed Jan 12, 2011
1 parent 00de2e8 commit d601d54
Showing 1 changed file with 6 additions and 0 deletions.
6 changes: 6 additions & 0 deletions src/fs.clj
Expand Up @@ -34,6 +34,9 @@
[path]
(.delete (File. path)))

; FIXME: Write this
;(defn rmtree [root] ...)

(defn exists?
"Return true if path exists."
[path]
Expand Down Expand Up @@ -115,6 +118,9 @@
from-channel (.getChannel (FileInputStream. from))]
(.transferFrom to-channel from-channel 0 (.size from-channel)))))

; FIXME: Write this
; (defn copytree [from to] ...

(defn tempfile
"Create a temporary file."
([] (tempfile "-fs-" ""))
Expand Down

0 comments on commit d601d54

Please sign in to comment.