Public archive for the Return to Ritherdon project.
https://www.nicolaellisandritherdon.com
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
Tree:
9650008ce9
master
stable
unstable
${ noResults }
ritherdon-archive/hunchentoot-example/src/utils.lisp
10 lines
281 B
10 lines
281 B
(in-package :ritherdon-archive/utils)
|
|||
|
|||
|
|||
(defun format-date (date)
|
|||
"Format the given date with the default date format (yyyy-mm-dd). Return a string."
|
|||
(local-time:format-timestring nil date :format +date-y-m-d+))
|
|||
|
|||
(defun asciify (string)
|
|||
(str:downcase (slug:asciify string)))
|