magit-read-char-case: new function