Rename *-path vars to just * and made sure they return File objects.

Raynes · Nov 15, 2013 · 8fadbde · 8fadbde · csummers · Jun 16, 2014
1 parent ce49500
commit 8fadbde
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 7 deletions.
diff --git a/src/me/raynes/fs.clj b/src/me/raynes/fs.clj
@@ -102,13 +102,13 @@
   [path]
   (predicate exists (file path)))
 
-(defn absolute-path
-  "Return absolute path."
+(defn absolute
+  "Return absolute file."
   [path]
-  (.getAbsolutePath (file path)))
+  (.getAbsoluteFile (file path)))
 
-(defn normalized-path
-  "Return normalized (canonical) path."
+(defn normalized
+  "Return normalized (canonical) file."
   [path]
   (.getCanonicalFile (file path)))
 

diff --git a/test/me/raynes/core_test.clj b/test/me/raynes/core_test.clj
@@ -92,10 +92,10 @@
     (delete tmp)))
 
 (fact
-  (absolute-path "foo") => (str (io/file *cwd* "foo")))
+  (absolute "foo") => (io/file *cwd* "foo"))
 
 (fact
-  (normalized-path ".") => *cwd*)
+  (normalized ".") => *cwd*)
 
 (fact
   (base-name "foo/bar") => "bar"