diff options
Diffstat (limited to 'lazybones.lisp')
-rw-r--r-- | lazybones.lisp | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lazybones.lisp b/lazybones.lisp index 970d212..9eb719a 100644 --- a/lazybones.lisp +++ b/lazybones.lisp @@ -298,11 +298,8 @@ Returns NIL on failure" (when (search "//" template) (warn "The proposed route ~s contains a double forward-slash (//), is this intended?" template)) - (when (a:ends-with #\/ template) - (warn "The proposed route ~s ends with a forward-slash (/), is this intended?" - template)) (unless (eql #\/ (elt template 0)) - (warn "The proposed route ~s does not begin with a forward-slash, is this intended?" + (error "The proposed route ~s does not begin with a forward-slash, is this intended?" template)) (loop for field in (str:split #\/ template) for var? = (parse-route-variable-string field) |