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

More cosmetic tweaks

db4
Slava Pestov 2009-05-22 17:42:05 -05:00
parent a1436e69cd
commit 760445c8e4
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
extra/webapps/mason/mason.factor
View File

@ -26,7 +26,7 @@ TUPLE: mason-app < dispatcher ;
[ "." split1 drop 16 tail* 6 head* download-link ] [ 2drop f ] if [ "." split1 drop 16 tail* 6 head* download-link ] [ 2drop f ] if
[XML <td class="supported"><div class="bigdiv"><-></div></td> XML] [XML <td class="supported"><div class="bigdiv"><-></div></td> XML]
] [ ] [
[XML <td /> XML] [XML <td class="doesnotexist" /> XML]
] if* ; ] if* ;
CONSTANT: oses CONSTANT: oses
@ -58,7 +58,12 @@ CONSTANT: cpus
[XML <tr><th align='center' scope='row'><-></th><-></tr> XML] [XML <tr><th align='center' scope='row'><-></th><-></tr> XML]
] with map ] with map
] bi ] bi
[XML <table id="downloads" cellspacing="0"><tr><th/><-></tr><-></table> XML] ; [XML
<table id="downloads" cellspacing="0">
<tr><th class="nobg">OS/CPU</th><-></tr>
<->
</table>
XML] ;
: <download-grid-action> ( -- action ) : <download-grid-action> ( -- action )
<action> <action>