GNU bug report logs - #39154
27.0.60; Use character history in zap-up-to-char

Previous Next

Full log

View this message in rfc822 format

From: Tino Calancha <tino.calancha <at> gmail.com>
To: 39154 <at> debbugs.gnu.org
Cc: juri linkov <juri <at> linkov.net>
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 <tino.calancha <at> gmail.com>

>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 :-)

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.