Skip to content

Commit

Permalink
help.syntax: handle parens
Browse files Browse the repository at this point in the history
  • Loading branch information
mrjbq7 committed May 3, 2023
1 parent 3fb619e commit b6d2182
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions basis/help/syntax/syntax.factor
Original file line number Diff line number Diff line change
Expand Up @@ -47,7 +47,7 @@ DEFER: HELP{
pick ?last dup array? [ ?first ] when
help-block? not and
] [
dup last CHAR: \s eq? not
dup last " (" member? not
] if [ CHAR: \s suffix! ] when ;

:: parse-help-text ( end -- seq )
Expand All @@ -64,7 +64,7 @@ DEFER: HELP{
obj [
[
dup string? [
dup ?first " .,;:" member? [
dup ?first " .,;:)" member? [
[ push-help-space ] dip
] unless append!
] [
Expand Down

0 comments on commit b6d2182

Please sign in to comment.