bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#39154: 27.0.60; Use character history in zap-up-to-char


From: Tino Calancha
Subject: bug#39154: 27.0.60; Use character history in zap-up-to-char
Date: Thu, 16 Jan 2020 19:56:55 +0100

From: Tino Calancha <address@hidden>

>diff --git a/lisp/misc.el b/lisp/misc.el
>index 05244a6ea2..8b6b7a7e0d 100644
>--- a/lisp/misc.el
>+++ b/lisp/misc.el
>@@ -69,7 +69,9 @@ zap-up-to-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."
>-  (interactive "p\ncZap up to char: ")
>+  (interactive (list (prefix-numeric-value current-prefix-arg)
>+                   (read-char-from-minibuffer "Zap to char: "
>+                                              nil 'read-char-history)))
>   (let ((direction (if (>= arg 0) 1 -1)))
>     (kill-region (point)

Typo above, it should read '"Zap up to char: "', as follows:

>+                   (read-char-from-minibuffer "Zap up to char: "

Sorry for that :-)





reply via email to

[Prev in Thread] Current Thread [Next in Thread]