no frames for doc.txt

original commit: 882ea01e8e1b7c001106c247c1087d136e04b7e6
This commit is contained in:
Paul Steckler 2002-09-09 17:26:24 +00:00
parent 81b289642e
commit e5872a7998

View File

@ -436,11 +436,11 @@
files))))
docs doc-names doc-kinds)
(if (= 0 hit-count)
(format (string-constant nothing-found-for)
(format (string-constant plt:hd:nothing-found-for)
(apply
string-append
(cons (format "\"~a\"" (car string-finds))
(map (lambda (i) (format " ~a \"~a\"" (string-constant and) i))
(map (lambda (i) (format " ~a \"~a\"" (string-constant plt:hd:and) i))
(cdr string-finds)))))
#f))))