suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

typo

Browse Source 
svn: r10183
This commit is contained in:
Eli Barzilay 2008-06-06 19:46:56 +00:00
parent 3718da39a8
commit 36809f291e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/setup/private/path-utils.ss
View File

@ -11,7 +11,7 @@
;; user-doc-mode can be `false-if-missing' or `never' ;; user-doc-mode can be `false-if-missing' or `never'
(define (doc-path dir name flags [user-doc-mode #f]) (define (doc-path dir name flags [user-doc-mode #f])
(define (user-doc [sub #f]) (define (user-doc [sub #f])
(and (not (eq? 'never)) (and (not (eq? 'never user-doc-mode))
(let ([d (find-user-doc-dir)]) (let ([d (find-user-doc-dir)])
(and (or (not (eq? 'false-if-missing user-doc-mode)) (and (or (not (eq? 'false-if-missing user-doc-mode))
(directory-exists? d)) (directory-exists? d))