From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Lars Ingebrigtsen Newsgroups: gmane.emacs.bugs Subject: bug#56384: 29.0.50; backward-word doesn't move far enough in message-mode Date: Tue, 05 Jul 2022 13:52:29 +0200 Message-ID: <87o7y33hfm.fsf@gnus.org> References: <875ykcoodr.fsf@athena.silentflame.com> <87zghn4x1z.fsf@gnus.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="18244"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/29.0.50 (gnu/linux) Cc: 56384@debbugs.gnu.org, Sean Whitton To: Andreas Schwab Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Tue Jul 05 13:53:15 2022 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1o8h7D-0004Y5-Ky for geb-bug-gnu-emacs@m.gmane-mx.org; Tue, 05 Jul 2022 13:53:15 +0200 Original-Received: from localhost ([::1]:46102 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1o8h7C-0004i1-HD for geb-bug-gnu-emacs@m.gmane-mx.org; Tue, 05 Jul 2022 07:53:14 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:51852) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1o8h70-0004gt-Qm for bug-gnu-emacs@gnu.org; Tue, 05 Jul 2022 07:53:02 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:55660) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1o8h70-0002M8-He for bug-gnu-emacs@gnu.org; Tue, 05 Jul 2022 07:53:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1o8h70-0006bv-Gd for bug-gnu-emacs@gnu.org; Tue, 05 Jul 2022 07:53:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Lars Ingebrigtsen Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Tue, 05 Jul 2022 11:53:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 56384 X-GNU-PR-Package: emacs Original-Received: via spool by 56384-submit@debbugs.gnu.org id=B56384.165702196225380 (code B ref 56384); Tue, 05 Jul 2022 11:53:02 +0000 Original-Received: (at 56384) by debbugs.gnu.org; 5 Jul 2022 11:52:42 +0000 Original-Received: from localhost ([127.0.0.1]:49557 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1o8h6f-0006bG-TN for submit@debbugs.gnu.org; Tue, 05 Jul 2022 07:52:42 -0400 Original-Received: from quimby.gnus.org ([95.216.78.240]:43328) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1o8h6e-0006b4-G1 for 56384@debbugs.gnu.org; Tue, 05 Jul 2022 07:52:40 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnus.org; s=20200322; h=Content-Transfer-Encoding:Content-Type:MIME-Version:Message-ID :Date:References:In-Reply-To:Subject:Cc:To:From:Sender:Reply-To:Content-ID: Content-Description:Resent-Date:Resent-From:Resent-Sender:Resent-To:Resent-Cc :Resent-Message-ID:List-Id:List-Help:List-Unsubscribe:List-Subscribe: List-Post:List-Owner:List-Archive; bh=f0OgwK5TakOwjcJUkzgDgjF71W4rILJYw3GrhwtSvKE=; b=tXPBbdIRD+jZ+sQapd1c5rj0xe bfUdaWIHdBVoN0+QekGZMFL5KuOLh8KrGVrVSZ6WhT6G5araoX/3CAMA44POZWj51y205Ib8Q+ZTr s4S6TOZshZhU5Ic0ErqsuLY6mnC8tv2WtZpBfRhwl4TPwvC5V3zKME9ghwX/6ePsaUbk=; Original-Received: from [84.212.220.105] (helo=joga) by quimby.gnus.org with esmtpsa (TLS1.3:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1o8h6V-0001JI-3G; Tue, 05 Jul 2022 13:52:33 +0200 In-Reply-To: (Andreas Schwab's message of "Tue, 05 Jul 2022 13:43:52 +0200") Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwAgMAAAAqbBEUAAAABGdBTUEAALGPC/xhBQAAACBj SFJNAAB6JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAADFBMVEWcm55ET0UVFBX/ //+9ms0AAAAAAWJLR0QDEQxM8gAAAAd0SU1FB+YHBQsyLFrKqW4AAAGwSURBVCjPJZCxbhsxEESH Ru4K9xTi653CX0EBNpCougNuCZBVAtwJEr9CaVSksgyTiK8yAlEQ9yuztDs+LGd2dtBl5Zk5rpPT GGbifblEItJQYaFStlFPRoPmNyKZjHOvIOPoyiUTjU8gGxMHFqARs1/SEsTODhVIz5Tkr3PI/vRt GMjd+0tBDmn7a2yIPEdMoWyzI5YYGfkpsCXaS6SEQp0TGNviC7h03oX4rHIQg9fVstPWYA6MaLry DG9AWYB0AfwBW2bYqB2wMrgXGMQWaMxjqBqiGdBjI1tFRwRM00q24pT1Hk3v/DlscIrNHR5OdvNq Wwzj+gdCTJskQU0//EVI7G2WfZqu6ESdo4WidMVtPaAMWLv0bjehjizWgd/VkeUaSWL88hsvSwnZ S6zV6Tv+yS9pEkbT1xq/3PIFB+V3NX5ppZCz4h2km+wlwQ7Uozpz3mKqUN+cGJMm8wGlY/wk6lWF a8s438RebeTPGYy7dcFNDXrFCp1U0HQf+zs5kvpW5MzGI2UybTX4svfY58FUCaP2Fl4O9Wq2Ao/h +AnVIvHRfEDnGW/8Rz18Dvg/34fvddfenN8AAAAldEVYdGRhdGU6Y3JlYXRlADIwMjItMDctMDVU MTE6NTA6NDQrMDA6MDBTYEd3AAAAJXRFWHRkYXRlOm1vZGlmeQAyMDIyLTA3LTA1VDExOjUwOjQ0 KzAwOjAwIj3/ywAAAABJRU5ErkJggg== X-Now-Playing: Eurythmics's _In The Garden_: "Never Gonna Cry Again" X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.io gmane.emacs.bugs:236108 Archived-At: Andreas Schwab writes: > There is a syntax-table property on the first character. Ah, thanks. This was added by: commit 25449e7296fe6e5cd9bca49ae1bc52d1552d5324 Author: Jo=C3=A3o T=C3=A1vora AuthorDate: Sun Apr 12 13:12:27 2015 +0100 Summary: Improve sexp-based movement in message-mode =20=20=20=20 Works by giving citations and smileys a different syntax. This helps modes like `show-paren-mode', `electric-pair-mode', and C-M-* sexp-based movement. =20=20=20=20 * lisp/gnus/message.el (message--syntax-propertize): New function. (message-mode): Set syntax-related vars. (message-smileys): New variable. =20=20=20=20 * test/automated/message-mode-tests.el: New file diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -2964,0 +2969,18 @@ +(defun message--syntax-propertize (beg end) + "Syntax-propertize certain message text specially." + (let ((citation-regexp (concat "^" message-cite-prefix-regexp ".*$")) + (smiley-regexp (regexp-opt message-smileys))) + (goto-char beg) + (while (search-forward-regexp citation-regexp + end 'noerror) + (let ((start (match-beginning 0)) + (end (match-end 0))) + (add-text-properties start (1+ start) + `(syntax-table ,(string-to-syntax "<"))) + (add-text-properties end (min (1+ end) (point-max)) + `(syntax-table ,(string-to-syntax ">"))))) + (goto-char beg) + (while (search-forward-regexp smiley-regexp + end 'noerror) + (add-text-properties (match-beginning 0) (match-end 0) + `(syntax-table ,(string-to-syntax ".")))))) So it's giving the first character of each cited line a "<" syntax... --=20 (domestic pets only, the antidote for overdose, milk.) bloggy blog: http://lars.ingebrigtsen.no