X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/7ae23d74a4a7ec3b778f48e26d7a81a338a56111..c6b4ed992d81518f240509e6ab212d8fe705485a:/src/pset-impl.lisp

diff --git a/src/pset-impl.lisp b/src/pset-impl.lisp
index f5650cf..42049db 100644
--- a/src/pset-impl.lisp
+++ b/src/pset-impl.lisp
@@ -75,9 +75,9 @@
 			name (package-name package)))))))))
 
 (let ((truth-map (make-hash-table :test #'equalp)))
-  (dolist (string '("true" "t" "yes" "on" "verily"))
+  (dolist (string '("true" "t" "yes" "on" "yup" "verily"))
     (setf (gethash string truth-map) t))
-  (dolist (string '("false" "nil" "no" "off" "nowise"))
+  (dolist (string '("false" "nil" "no" "off" "nope" "nowise"))
     (setf (gethash string truth-map) nil))
   (defun truishp (string)
     "Convert STRING to a boolean."