diff options
Diffstat (limited to 'lib/oneliner.lisp')
| -rw-r--r-- | lib/oneliner.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/oneliner.lisp b/lib/oneliner.lisp index ccfd3dc..39aad0d 100644 --- a/lib/oneliner.lisp +++ b/lib/oneliner.lisp @@ -48,11 +48,13 @@ (ppcre:all-matches-as-strings "#[A-Za-z][A-Za-z0-9_]*" (oneliner-oneliner ol)) :test #'equal)) + + ;;; VALIDATION OF ONELINER SLOT VALUES (defun valid-oneliner-string-p (string) (and (not (find #\newline string)) - (tags-from-oneliner string))) + (parse-oneliner-tags string))) (defun valid-brief-description-p (string) (<= (length string) 72)) |