/[webpac]/trunk/openisis/tcl/list.tsp
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /trunk/openisis/tcl/list.tsp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 239 - (hide annotations)
Mon Mar 8 17:49:13 2004 UTC (17 years, 7 months ago) by dpavlin
File size: 228 byte(s)
including openisis 0.9.0 into webpac tree

1 dpavlin 237 <%
2     global idx
3     set mfn [v rowid] ;# get the mfn
4     # use first field, if we don't have CDS' famous 24
5     if [catch {v get 24} list] { set list [v get] }
6     %>
7     <b><a href="/idx/<%=idx%>"><%=mfn%></a></b>: <%=MHL [lindex $list 0]%><br>

  ViewVC Help
Powered by ViewVC 1.1.26