r3858: *** empty log message ***
[lml.git] / stdsite.lisp
index d36c83ec33ab58ba3e99b1a6d89ba9fe63382ddf..a0e99849beeaee0c398dbfef8dabe6b25be59a98 100644 (file)
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Aug 2002
 ;;;;
-;;;; $Id: stdsite.lisp,v 1.2 2002/10/18 06:34:05 kevin Exp $
+;;;; $Id: stdsite.lisp,v 1.3 2003/01/24 08:51:41 kevin Exp $
 ;;;;
 ;;;; This file, part of LML, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -42,7 +42,7 @@
                     :name (pathname-name file))))       
       (when (probe-file src-file)
        (div-c "lastmod"
-          (lml-print "Last modified: ~A" (date-string (file-write-date src-file))))))
+          (lml-format  "Last modified: ~A" (date-string (file-write-date src-file))))))
     (lml-load "footer.lml_"))
   (values))