Selaa lähdekoodia

Disallow periods in slugs. Fixes Issue #10.

Brit Butler 12 vuotta sitten
vanhempi
commit
a1b39bfa33
1 muutettua tiedostoa jossa 1 lisäystä ja 1 poistoa
  1. 1 1
      src/content.lisp

+ 1 - 1
src/content.lisp

@@ -77,7 +77,7 @@ bound to the current subclass."
77 77
   (or (char<= #\0 char #\9)
78 78
       (char<= #\a char #\z)
79 79
       (char<= #\A char #\Z)
80
-      (member char '(#\_ #\- #\.))))
80
+      (member char '(#\_ #\-))))
81 81
 
82 82
 (defun slugify (string)
83 83
   "Return a version of STRING suitable for use as a URL."