From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Stefan Monnier Newsgroups: gmane.emacs.bugs Subject: bug#4981: C-l during query-replace Date: Sun, 29 Nov 2009 20:28:07 -0500 Message-ID: References: <200911200016.nAK0Gxf5005670@godzilla.ics.uci.edu> <873a49ad0f.fsf@mail.jurta.org> <87fx7w7v6p.fsf@mail.jurta.org> Reply-To: Stefan Monnier , 4981@emacsbugs.donarmstrong.com NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1259545675 14497 80.91.229.12 (30 Nov 2009 01:47:55 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 30 Nov 2009 01:47:55 +0000 (UTC) Cc: 4981@emacsbugs.donarmstrong.com, Dan Nicolaescu To: Juri Linkov Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Mon Nov 30 02:47:47 2009 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1NEvMg-0000xq-NE for geb-bug-gnu-emacs@m.gmane.org; Mon, 30 Nov 2009 02:47:46 +0100 Original-Received: from localhost ([127.0.0.1]:59652 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NEvMg-0002QQ-Cs for geb-bug-gnu-emacs@m.gmane.org; Sun, 29 Nov 2009 20:47:46 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NEvMS-0002KN-35 for bug-gnu-emacs@gnu.org; Sun, 29 Nov 2009 20:47:32 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1NEvMN-0002JV-0m for bug-gnu-emacs@gnu.org; Sun, 29 Nov 2009 20:47:31 -0500 Original-Received: from [199.232.76.173] (port=33440 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NEvMM-0002JP-Tg for bug-gnu-emacs@gnu.org; Sun, 29 Nov 2009 20:47:26 -0500 Original-Received: from rzlab.ucr.edu ([138.23.92.77]:55880) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1NEvMM-00023r-ES for bug-gnu-emacs@gnu.org; Sun, 29 Nov 2009 20:47:26 -0500 Original-Received: from rzlab.ucr.edu (rzlab.ucr.edu [127.0.0.1]) by rzlab.ucr.edu (8.14.3/8.14.3/Debian-5) with ESMTP id nAU1lNlq007119; Sun, 29 Nov 2009 17:47:24 -0800 Original-Received: (from debbugs@localhost) by rzlab.ucr.edu (8.14.3/8.14.3/Submit) id nAU1Z7B4006053; Sun, 29 Nov 2009 17:35:07 -0800 Resent-Date: Sun, 29 Nov 2009 17:35:07 -0800 X-Loop: owner@emacsbugs.donarmstrong.com Resent-From: Stefan Monnier Resent-To: bug-submit-list@donarmstrong.com Resent-CC: Emacs Bugs 2Resent-Date: Mon, 30 Nov 2009 01:35:07 +0000 Resent-Message-ID: Resent-Sender: owner@emacsbugs.donarmstrong.com X-Emacs-PR-Message: followup 4981 X-Emacs-PR-Package: emacs X-Emacs-PR-Keywords: Original-Received: via spool by 4981-submit@emacsbugs.donarmstrong.com id=B4981.12595444945446 (code B ref 4981); Mon, 30 Nov 2009 01:35:07 +0000 Original-Received: (at 4981) by emacsbugs.donarmstrong.com; 30 Nov 2009 01:28:14 +0000 X-Spam-Bayes: score:0.5 Bayes not run. spammytokens:Tokens not available. hammytokens:Tokens not available. Original-Received: from ironport2-out.pppoe.ca (ironport2-out.teksavvy.com [206.248.154.183]) by rzlab.ucr.edu (8.14.3/8.14.3/Debian-5) with ESMTP id nAU1SC5A005442 for <4981@emacsbugs.donarmstrong.com>; Sun, 29 Nov 2009 17:28:14 -0800 X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AqEEAKuuEktFpYc//2dsb2JhbACBTtIIhDEEihk X-IronPort-AV: E=Sophos;i="4.47,309,1257138000"; d="scan'208";a="50298798" Original-Received: from 69-165-135-63.dsl.teksavvy.com (HELO ceviche.home) ([69.165.135.63]) by ironport2-out.pppoe.ca with ESMTP; 29 Nov 2009 20:28:07 -0500 Original-Received: by ceviche.home (Postfix, from userid 20848) id 4BF4A701E4; Sun, 29 Nov 2009 20:28:07 -0500 (EST) In-Reply-To: <87fx7w7v6p.fsf@mail.jurta.org> (Juri Linkov's message of "Mon, 30 Nov 2009 01:44:30 +0200") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.1.50 (gnu/linux) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 2) Resent-Date: Sun, 29 Nov 2009 20:47:31 -0500 X-BeenThere: bug-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:33048 Archived-At: > I can't find a clean solution because in the case of query-replace, > `this-command' is always `query-replace'. Why not: > Index: lisp/replace.el > =================================================================== > RCS file: /sources/emacs/emacs/lisp/replace.el,v > retrieving revision 1.287 > diff -u -r1.287 replace.el > --- lisp/replace.el 12 Nov 2009 06:55:43 -0000 1.287 > +++ lisp/replace.el 29 Nov 2009 23:43:28 -0000 > @@ -1785,7 +1788,9 @@ > ((eq def 'skip) > (setq done t)) > ((eq def 'recenter) > - (recenter nil)) > + (let ((this-command 'recenter-top-bottom)) > + (recenter-top-bottom))) > ((eq def 'edit) > (let ((opos (point-marker))) > (setq real-match-data (replace-match-data -- Stefan