generalize env_dir_on out of home_dir_on

diff --git a/lib/DX/Lib/FS.pm b/lib/DX/Lib/FS.pm
index cc9456e..81bc3b7 100644 (file)
--- a/lib/DX/Lib/FS.pm
+++ b/lib/DX/Lib/FS.pm
@@ -212,11 +212,14 @@ our @RULES = (
       } ],
     [ _env_dir_at => qw(ED P) ] ],
 
-  [ home_dir_on => [ qw(A D) ],
-    [ path_on => 'A', \'HOME', 'P' ],
+  [ env_dir_on => [ qw(A E D) ],
+    [ path_on => 'A', 'E', 'P' ],
     [ env_dir_at => ED => 'P' ],
     [ prop => ED => \'value' => 'H' ],
     [ path_on => 'A', 'H', 'D' ] ],
+
+  [ home_dir_on => [ qw(A D) ],
+    [ env_dir_on => 'A', \'HOME', 'D' ] ],
 );
 
 sub load_into {