>>  ...to be able to specify the test function in CASE.
>>  (selector item equalp ("foo" ...) ...)
>>
>>  (case item :test #'equalp ("foo" ...) ...)
>>
>>  (cond ((equalp item "foo") ...) ...)
Of the three, I prefer the
(case item :test #'equalp ("foo" ...) ...)
But I would rather a separate function
(case-with-test item equalp ...)
----- dgb: