diff --git a/lib/chibi/snow/commands.scm b/lib/chibi/snow/commands.scm index 1c8e4b5d..d0b485dc 100644 --- a/lib/chibi/snow/commands.scm +++ b/lib/chibi/snow/commands.scm @@ -365,7 +365,10 @@ (else '())))) (define package-description - (let ((sent-re (regexp '(: "
" (* "\n") (* space) ($ (* (~ ("."))) ".")))) + (let ((sent-re (regexp '(: "
" (* "\n") (* space) + ($ (* (or (: "<" (* (~ (">"))) ">") + (~ ("<.")))) + ".")))) (space-re (regexp '(or (: (* space) "\n" (* space)) (>= 2 space)))) (tag-re (regexp '(: "<" (? "/") (* (~ ("<>"))) ">")))) (lambda (cfg spec libs docs)