openisis/tcl/list.tsp

<%
        global idx
        set mfn [v rowid] ;# get the mfn
        # use first field, if we don't have CDS' famous 24
        if [catch {v get 24} list] { set list [v get] }
%>
<b><a href="/idx/<%=idx%>"><%=mfn%></a></b>: <%=MHL [lindex $list 0]%><br>
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>