From ccac6a95bb894edbfd8c21f55d83a4f077df7f4c Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Mon, 21 Nov 2022 07:33:23 -0600 Subject: Modify: index reader for user name is case insensitive --- model.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/model.lisp b/model.lisp index 399d018..432eec7 100644 --- a/model.lisp +++ b/model.lisp @@ -12,7 +12,8 @@ (defclass/bknr user (keyed) ((name :with :index-type string-unique-index - :index-reader user-with-name) + :index-reader user-with-name + :index-initargs (:test 'equalp)) (playlists :with :std (list)) (pwsalt :with :std (nuid)) (pwhash :with))) -- cgit v1.2.3