misc: Use separatedBy: for the beauty of reading it, no big win
This commit is contained in:
parent
e7c75b7dcd
commit
f13639d443
|
@ -167,10 +167,10 @@ SIPGrammar subclass: SIPParser [
|
||||||
^super challenge => [:nodes |
|
^super challenge => [:nodes |
|
||||||
| d |
|
| d |
|
||||||
d := Dictionary new.
|
d := Dictionary new.
|
||||||
|
(nodes at: 2) do: [:each |
|
||||||
(nodes at: 4) do:
|
"Skip the separator for now until we have withoutSeparators"
|
||||||
[:each | d at: each second first put: each second third ].
|
each isCharacter ifFalse: [
|
||||||
d at: (nodes at: 3) first put: (nodes at: 3) third.
|
d at: each first put: each third]].
|
||||||
d]
|
d]
|
||||||
]
|
]
|
||||||
|
|
||||||
|
|
|
@ -529,7 +529,7 @@ PP.PPCompositeParser subclass: SIPGrammar [
|
||||||
|
|
||||||
challenge [
|
challenge [
|
||||||
<category: 'WWW-Authenticate'>
|
<category: 'WWW-Authenticate'>
|
||||||
^('Digest' asParser, LWS, self digest_cln, (COMMA, self digest_cln) star) /
|
^('Digest' asParser trim, (digest_cln separatedBy: COMMA)) /
|
||||||
self other_challenge
|
self other_challenge
|
||||||
]
|
]
|
||||||
|
|
||||||
|
@ -541,7 +541,7 @@ PP.PPCompositeParser subclass: SIPGrammar [
|
||||||
|
|
||||||
other_challenge [
|
other_challenge [
|
||||||
<category: 'WWW-Authenticate'>
|
<category: 'WWW-Authenticate'>
|
||||||
^self auth_scheme, LWS, self auth_param, (COMMA, self auth_param) star
|
^self auth_scheme trim, (auth_param separatedBy: COMMA)
|
||||||
]
|
]
|
||||||
|
|
||||||
realm [
|
realm [
|
||||||
|
|
Reference in New Issue