Move a file atomically in Clojure

atomically_rename.clj

;;; Move a file atomically in Clojure.
;; This will also replace the target file if it exists since REPLACE_EXISTING is included in the options at the end.

;; user.dir == current working directory (on Linux at least).
(let [source-filename (str (System/getProperty "user.dir") "/source.txt") 
      target-filename (str (System/getProperty "user.dir") "/target.txt")
      source-file (java.nio.file.Paths/get (java.net.URI/create (str "file://" source-filename)))
      target-file (java.nio.file.Paths/get (java.net.URI/create (str "file://"  target-filename)))]
  (java.nio.file.Files/move source-file target-file
                            (into-array java.nio.file.CopyOption
                                        [(java.nio.file.StandardCopyOption/ATOMIC_MOVE)
                                         (java.nio.file.StandardCopyOption/REPLACE_EXISTING)])))