steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

html.parser.analyzer: find-between* didn't always return a sequence, which in turn broke find-hrefs (reported by randy7)

db4
Philipp Brüschweiler 2010-08-13 22:53:37 +02:00
parent 50c3f2e03e
commit 99a37fd571
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
extra/html/parser/analyzer/analyzer.factor
View File

@ -29,8 +29,7 @@ TUPLE: link attributes clickable ;
: find-between* ( vector i/f tag/f -- vector ) : find-between* ( vector i/f tag/f -- vector )
over integer? [ over integer? [
[ tail-slice ] [ name>> ] bi* [ tail-slice ] [ name>> ] bi*
dupd find-matching-close drop dup [ 1 + ] when dupd find-matching-close drop 0 or 1 + head
[ head ] [ first ] if*
] [ ] [
3drop V{ } clone 3drop V{ } clone
] if ; inline ] if ; inline