Update doc.

pull/4/head
Kefei Lu 2018-04-02 15:24:27 -07:00
parent a67b338dea
commit 7f50ecf63c
1 changed files with 2 additions and 2 deletions

View File

@ -55,8 +55,8 @@ As a complex example, [`man.ss`](man.ss) defines a online man-page lookup:
(chain ; chain functions together
(cond ; pick a manpage lookup based on OS
((equal? os "freebsd") (man-freebsd))
((equal? os "linux") (man-linux))
(else (man-freebsd)))
((equal? os "linux") (man-linux))
(else (man-freebsd)))
(truncate-string max-length)))) ; truncate output string to a max length
```