diff --git a/extra/io/unix/files/files.factor b/extra/io/unix/files/files.factor
index d30e5c93a5..69d4356d18 100755
--- a/extra/io/unix/files/files.factor
+++ b/extra/io/unix/files/files.factor
@@ -105,6 +105,4 @@ M: unix make-link ( path1 path2 -- )
     normalize-path symlink io-error ;
 
 M: unix read-link ( path -- path' )
-    normalize-path
-    PATH_MAX [ <byte-array> tuck ] [ ] bi readlink
-    dup io-error head-slice >string ;
+   normalize-path read-symbolic-link ;
\ No newline at end of file