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

fix hyperlinks

cvs
Slava Pestov 2005-05-03 23:55:01 +00:00
parent 2e691d06be
commit af639e3e67
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
library/httpd/html.factor
View File

@ -87,7 +87,7 @@ stdio streams strings unparser http ;
[ "/responder/browser/?vocab=" , , "&word=" , , ] make-string ; [ "/responder/browser/?vocab=" , , "&word=" , , ] make-string ;
: browser-link-tag ( style quot -- style ) : browser-link-tag ( style quot -- style )
over "browser-link-word" swap assoc [ over "word" swap assoc [
<a href= over browser-link-href a> call </a> <a href= over browser-link-href a> call </a>
] [ ] [
call call