working on #10

hrbrmstr · Oct 15, 2018 · 017d6c0 · 017d6c0
1 parent 6535edc
commit 017d6c0
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/read-msg.r b/R/read-msg.r
@@ -11,7 +11,7 @@
 #' read_msg(system.file("extdata/TestMessage-unicode.msg", package="msgxtractr"))
 read_msg <- function(path) {
 
-  path <- path.expand(path)
+  path <- normalizePath(path.expand(path))
   if (!file.exists(path)) stop("File not found.", call.=FALSE)
 
   x <- int_read_msg(path)