Revert "fix a couple more tilde paths."

This reverts commit b139a896ef7de4e9ca25794c3631186be9c8c888.

diff --git a/basis/command-line/command-line-docs.factor b/basis/command-line/command-line-docs.factor
index 4ba7d66623c213d5841970a22451841cd840683a..5b41e9abe9f74d9864c4df4fd93a8c29ad68f6d1 100644 (file)
--- a/basis/command-line/command-line-docs.factor
+++ b/basis/command-line/command-line-docs.factor
@@ -126,9 +126,9 @@ ARTICLE: "rc-files" "Running code on startup"
 $nl
 "If you are unsure where the files should be located, evaluate the following code:"
 { $code
-    "USING: io io.pathnames ;"
-    "\"~/.factor-rc\" absolute-path print"
-    "\"~/.factor-boot-rc\" absolute-path print"
+    "USE: command-line"
+    "\".factor-rc\" rc-path print"
+    "\".factor-boot-rc\" rc-path print"
 }
 "Here is an example " { $snippet ".factor-boot-rc" } " which sets up your developer name:"
 { $code

diff --git a/extra/mason/test/test.factor b/extra/mason/test/test.factor
index b7f7769413fa3dbbe9e506553e2ab0ed75976b2c..bd2e9dc50aa0bdb08f280a07b9a5818c59f43ff2 100644 (file)
--- a/extra/mason/test/test.factor
+++ b/extra/mason/test/test.factor
@@ -94,7 +94,7 @@ M: method word-vocabulary "method-generic" word-prop word-vocabulary ;
 
 : run-mason-rc ( -- )
     t "user-init" [
-        "~/.factor-mason-rc" try-user-init
+        ".factor-mason-rc" rc-path try-user-init
     ] with-variable ;
 
 : check-user-init-errors ( -- ? )