diff options
author | colin <colin@cicadas.surf> | 2023-04-06 07:29:47 -0700 |
---|---|---|
committer | colin <colin@cicadas.surf> | 2023-04-06 07:29:47 -0700 |
commit | 10dfda16361f1feaaee64596abd3b3dcea25ebfa (patch) | |
tree | 4d9bd3dd409f5e4063cfa01b3ebaf40cd6a51a1a /lazybones.lisp | |
parent | 341dc5227239f34b995f6c6f1cd40b9948d631e7 (diff) |
Changed warnings
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) |