diff --git a/src/content.lisp b/src/content.lisp index 49c6aba..224aa37 100644 --- a/src/content.lisp +++ b/src/content.lisp @@ -77,7 +77,7 @@ bound to the current subclass." (or (char<= #\0 char #\9) (char<= #\a char #\z) (char<= #\A char #\Z) - (member char '(#\_ #\- #\.)))) + (member char '(#\_ #\-)))) (defun slugify (string) "Return a version of STRING suitable for use as a URL."