Add scaffold-factor-roots word to tools.scaffold

diff --git a/basis/tools/scaffold/scaffold-docs.factor b/basis/tools/scaffold/scaffold-docs.factor
index 91f116b9afbce70f6dc1cca398ebe43f12f2ca44..db68049efa80cc0959c37e09e140374f4320f036 100644 (file)
--- a/basis/tools/scaffold/scaffold-docs.factor
+++ b/basis/tools/scaffold/scaffold-docs.factor
@@ -61,6 +61,9 @@ HELP: scaffold-factor-boot-rc
 HELP: scaffold-factor-rc
 { $description "Touches the .factor-rc file in your home directory and provides a clickable link to open it in an editor." } ;
 
+HELP: scaffold-factor-roots
+{ $description "Touches the .factor-roots file in your home directory and provides a clickable link to open it in an editor." } ;
+
 HELP: scaffold-rc
 { $values
     { "path" "a pathname string" }
@@ -87,6 +90,7 @@ ARTICLE: "tools.scaffold" "Scaffold tool"
     scaffold-rc
     scaffold-factor-boot-rc
     scaffold-factor-rc
+    scaffold-factor-roots
     scaffold-emacs
 }
 ;

diff --git a/basis/tools/scaffold/scaffold.factor b/basis/tools/scaffold/scaffold.factor
index 4f67c69d1854513ac854142eb220a89fb93f8082..9ee8e442f7494c938868f5f93fa0e23778bca1ee 100644 (file)
--- a/basis/tools/scaffold/scaffold.factor
+++ b/basis/tools/scaffold/scaffold.factor
@@ -347,6 +347,8 @@ SYMBOL: examples-flag
 : scaffold-factor-rc ( -- )
     ".factor-rc" scaffold-rc ;
 
+: scaffold-factor-roots ( -- )
+    ".factor-roots" scaffold-rc ;
 
 HOOK: scaffold-emacs os ( -- )