Re: Addition to lisp/misc.el

[Richard Stallman]

    > (defun zap-up-to-char (arg char)
    >   "Kill up to, but not including ARG'th occurrence of CHAR.
    > Case is ignored if `case-fold-search' is non-nil in the current buffer.
    > Goes backward if ARG is negative; error if CHAR not found.
    > Ignores CHAR at point."

    Why the `Ignores CHAR at point' anyway?

Because otherwise it would be a no-op when CHAR appear there; in
particular, repeating it would be useless.