Преглед на файлове

Disallow periods in slugs. Fixes Issue #10.

Brit Butler преди 12 години
родител
ревизия
a1b39bfa33
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  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."