[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: time into list



Or -

(defun timestamp ()
  (multiple-value-bind (sec min hour) 
                       (get-decoded-time)
    (format nil "~2@a:~2@a:~2@a" hour min sec)))

  -- Luke