From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Stefan Monnier Newsgroups: gmane.emacs.devel Subject: Re: log-edit.el Date: Wed, 25 May 2005 10:33:39 -0400 Message-ID: <87r7fvwfhe.fsf-monnier+emacs@gnu.org> References: <17044.23349.76511.530320@farnswood.snap.net.nz> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1117032093 5457 80.91.229.2 (25 May 2005 14:41:33 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 25 May 2005 14:41:33 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed May 25 16:41:31 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1Dax2L-00040Q-9G for ged-emacs-devel@m.gmane.org; Wed, 25 May 2005 16:39:10 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Dax6D-0006EU-KR for ged-emacs-devel@m.gmane.org; Wed, 25 May 2005 10:43:09 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Dax5N-0005zK-RY for emacs-devel@gnu.org; Wed, 25 May 2005 10:42:18 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Dax5I-0005x8-L8 for emacs-devel@gnu.org; Wed, 25 May 2005 10:42:13 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Dax5H-0005v5-RR for emacs-devel@gnu.org; Wed, 25 May 2005 10:42:11 -0400 Original-Received: from [209.226.175.25] (helo=tomts5-srv.bellnexxia.net) by monty-python.gnu.org with esmtp (Exim 4.34) id 1DawxT-0004wi-Bx for emacs-devel@gnu.org; Wed, 25 May 2005 10:34:07 -0400 Original-Received: from alfajor ([70.49.81.51]) by tomts5-srv.bellnexxia.net (InterMail vM.5.01.06.10 201-253-122-130-110-20040306) with ESMTP id <20050525143341.HZJO26128.tomts5-srv.bellnexxia.net@alfajor>; Wed, 25 May 2005 10:33:41 -0400 Original-Received: by alfajor (Postfix, from userid 1000) id CC63DD7700; Wed, 25 May 2005 10:33:39 -0400 (EDT) Original-To: Nick Roberts In-Reply-To: <17044.23349.76511.530320@farnswood.snap.net.nz> (Nick Roberts's message of "Wed, 25 May 2005 23:02:13 +1200") User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:37611 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:37611 > vc-nect-action in fns.c (C-v v v) followed by C-c C-a picks up: > * fns.c (Fyes_or_no_p, Fy_or_n_p): Call Fx_popup_dialog with > a third argument (Qnil). > * editfns.c (Fmessage_box): Use "Information" for frame title. > How about the patch below to stop this? This idea might be OK, but the place to add a " " is not where you put it but inside log-edit-changelog-entries where we do a (search-forward pattern). Is the patch below working for you? > Also, I use log-edit-insert-changelog all the time but never use pcl-cvs. > How about moving the node about log-edit from the pcl-cvs manual into > the Emacs manual? No objection here, Stefan --- orig/lisp/log-edit.el +++ mod/lisp/log-edit.el @@ -616,8 +616,12 @@ (search-forward pattern nil t)))) (setq pattern (file-name-nondirectory file))) + (setq pattern (concat "\\(^\\|[^[:alnum:]]\\)" + pattern + "\\($\\|[^[:alnum:]]\\)")) + (let (texts) - (while (search-forward pattern nil t) + (while (re-search-forward pattern nil t) (let ((entry (log-edit-changelog-entry))) (push entry texts) (goto-char (elt entry 1)))) @@ -655,5 +659,5 @@ (provide 'log-edit) -;;; arch-tag: 8089b39c-983b-4e83-93cd-ed0a64c7fdcc +;; arch-tag: 8089b39c-983b-4e83-93cd-ed0a64c7fdcc ;;; log-edit.el ends here