diff --git a/core/io/pathnames/pathnames.factor b/core/io/pathnames/pathnames.factor
index 2be66ef186..5a9c647973 100644
--- a/core/io/pathnames/pathnames.factor
+++ b/core/io/pathnames/pathnames.factor
@@ -76,8 +76,6 @@ ERROR: no-parent-directory path ;
         [ f ]
     } cond ;
 
-PRIVATE>
-
 : absolute-path? ( path -- ? )
     {
         { [ dup empty? ] [ f ] }
@@ -87,6 +85,8 @@ PRIVATE>
         [ f ]
     } cond nip ;
 
+PRIVATE>
+
 : append-path ( path1 path2 -- path )
     {
         { [ over empty? ] [ append-path-empty ] }