RE: What's the best way to do "string-memq"?

[Drew Adams]

> I need a predicate which I'd ideally like to write as
>     (string-memq (char-after) skip-chars)
> , where skip-chars is a string like "^;{}?:", and the predicate should
> return t when (char-after) is one of (?^ ?\; ?\{ ?\} ?\? ?\:).

Here are a couple of ways:

(string-match (regexp-quote
               (char-to-string (char-after)))
              skip-chars)

(member (char-after) (string-to-list skip-chars))

(They return non-nil, not t, but you can fix that.) Someone else will probably
show you a better way. And you're right that cl offers this out of the box.