steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

tools.scaffold: rename ``touch.`` to ``scaffold-file``.

windows-high-dpi
John Benediktsson 2018-02-26 17:21:27 -08:00
parent 8af27125ec
commit 43af9df6e0
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
basis/tools/scaffold/scaffold.factor
View File

@ -348,22 +348,22 @@ ${example-indent}}
: scaffold-examples ( word -- ) : scaffold-examples ( word -- )
2 swap scaffold-n-examples ; 2 swap scaffold-n-examples ;
: touch. ( path -- ) : scaffold-file ( path -- )
[ touch-file ] [ touch-file ]
[ "Click to edit: " write <pathname> . ] bi ; [ "Click to edit: " write <pathname> . ] bi ;
: scaffold-factor-boot-rc ( -- ) : scaffold-factor-boot-rc ( -- )
"~/.factor-boot-rc" touch. ; "~/.factor-boot-rc" scaffold-file ;
: scaffold-factor-rc ( -- ) : scaffold-factor-rc ( -- )
"~/.factor-rc" touch. ; "~/.factor-rc" scaffold-file ;
: scaffold-mason-rc ( -- ) : scaffold-mason-rc ( -- )
"~/.factor-mason-rc" touch. ; "~/.factor-mason-rc" scaffold-file ;
: scaffold-factor-roots ( -- ) : scaffold-factor-roots ( -- )
"~/.factor-roots" touch. ; "~/.factor-roots" scaffold-file ;
HOOK: scaffold-emacs os ( -- ) HOOK: scaffold-emacs os ( -- )
M: unix scaffold-emacs ( -- ) "~/.emacs" touch. ; M: unix scaffold-emacs ( -- ) "~/.emacs" scaffold-file ;