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

Revert "help.pdf: use tilde paths." 

This reverts commit 9276c26f4c.
paths
Doug Coleman 2018-03-15 08:43:13 -05:00
parent c1f38d6864
commit 7941b033f7
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
extra/help/pdf/pdf.factor
View File

@ -29,7 +29,7 @@ IN: help.pdf
[ topic>pdf ] map <pb> 1array join ;
: write-pdf ( pdf name -- )
[ pdf>string ] dip utf8 set-file-contents ;
[ pdf>string ] dip home prepend-path utf8 set-file-contents ;
PRIVATE>
@ -41,19 +41,19 @@ PRIVATE>
] [ write-pdf ] bi* ;
: cookbook-pdf ( -- )
"cookbook" "~/cookbook.pdf" article-pdf ;
"cookbook" "cookbook.pdf" article-pdf ;
: first-program-pdf ( -- )
"first-program" "~/first-program.pdf" article-pdf ;
"first-program" "first-program.pdf" article-pdf ;
: handbook-pdf ( -- )
"handbook-language-reference" "~/handbook.pdf" article-pdf ;
"handbook-language-reference" "handbook.pdf" article-pdf ;
: system-pdf ( -- )
"handbook-system-reference" "~/system.pdf" article-pdf ;
"handbook-system-reference" "system.pdf" article-pdf ;
: tools-pdf ( -- )
"handbook-tools-reference" "~/tools.pdf" article-pdf ;
"handbook-tools-reference" "tools" article-pdf ;
: index-pdf ( -- )
{
@ -62,13 +62,13 @@ PRIVATE>
"primitive-index"
"error-index"
"class-index"
} topics>pdf "~/index.pdf" write-pdf ;
} topics>pdf "index.pdf" write-pdf ;
: furnace-pdf ( -- )
"furnace" "~/furnace.pdf" article-pdf ;
"furnace" "furnace.pdf" article-pdf ;
: alien-pdf ( -- )
"alien" "~/alien.pdf" article-pdf ;
"alien" "alien.pdf" article-pdf ;
: io-pdf ( -- )
"io" "~/io.pdf" article-pdf ;
"io" "io.pdf" article-pdf ;