(lml-print "<a href=\"~A~A\">~A</a>" *ftp-url* ftp-name basename)
(lml-print "<span class=\"modtime\">")
(lml-print " (~A, <b>~:D <span style=\"font-size:90%;\">KB</span></b>)</span>" modtime size)
(lml-print "<a href=\"~A~A\">~A</a>" *ftp-url* ftp-name basename)
(lml-print "<span class=\"modtime\">")
(lml-print " (~A, <b>~:D <span style=\"font-size:90%;\">KB</span></b>)</span>" modtime size)