X-Git-Url: http://nitlanguage.org

diff --git a/lib/core/file.nit b/lib/core/file.nit
index 0454f1d..7f1d481 100644
--- a/lib/core/file.nit
+++ b/lib/core/file.nit
@@ -498,8 +498,8 @@ class Path
 		var output = dest.open_wo
 
 		while not input.eof do
-			var buffer = input.read(1024)
-			output.write buffer
+			var buffer = input.read_bytes(1024)
+			output.write_bytes buffer
 		end
 
 		input.close
@@ -663,6 +663,19 @@ class Path
 		return res
 	end
 
+	# Is `self` the path to an existing directory ?
+	#
+	# ~~~nit
+	# assert ".".to_path.is_dir
+	# assert not "/etc/issue".to_path.is_dir
+	# assert not "/should/not/exist".to_path.is_dir
+	# ~~~
+	fun is_dir: Bool do
+		var st = stat
+		if st == null then return false
+		return st.is_dir
+	end
+
 	# Delete a directory and all of its content
 	#
 	# Does not go through symbolic links and may get stuck in a cycle if there