suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

made truncated message be red italics

Browse Source 
svn: r8060

original commit: 5840ec28b3d0facc5604163587b1ca3cd7b030ac
This commit is contained in:
Robby Findler 2007-12-19 04:25:53 +00:00
parent 6bdb23bf75
commit 878223492b
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/help/search.ss
View File

@ -145,7 +145,7 @@
entries))) entries)))
(if (<= (length entries) limit) (if (<= (length entries) limit)
'() '()
(list (italic (format "Search truncated after ~a hits." limit))))))])) (list (make-element "schemeerror" (list (format "Search truncated after ~a hits." limit)))))))]))
(define (limit-length n l) (define (limit-length n l)
(cond (cond