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

Fix bug in html.parser.analyzer

db4
Doug Coleman 2010-10-25 12:50:43 -05:00
parent 1f57dc326e
commit edba5f2bbe
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -171,8 +171,8 @@ ERROR: undefined-find-nth m n seq quot ;
[ [ name>> { "form" "input" } member? ] filter ] map ; [ [ name>> { "form" "input" } member? ] filter ] map ;
: find-html-objects ( vector string -- vector' ) : find-html-objects ( vector string -- vector' )
dupd find-opening-tags-by-name over find-opening-tags-by-name
[ first2 find-between* ] curry map ; [ first2 find-between* ] with map ;
: form-action ( vector -- string ) : form-action ( vector -- string )
[ name>> "form" = ] find nip "action" attribute ; [ name>> "form" = ] find nip "action" attribute ;