From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: "J.P." Newsgroups: gmane.emacs.bugs Subject: bug#54343: 28.0.91; find-function goes to a wrong place for erc Date: Sat, 12 Mar 2022 00:27:25 -0800 Message-ID: <87k0czbmoi.fsf@neverwas.me> References: <87wnh0dnyr.fsf@neverwas.me> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="13098"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/29.0.50 (gnu/linux) Cc: 54343@debbugs.gnu.org To: Lin Jian Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Sat Mar 12 09:28:16 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 1nSx6l-0003DI-MG for geb-bug-gnu-emacs@m.gmane-mx.org; Sat, 12 Mar 2022 09:28:15 +0100 Original-Received: from localhost ([::1]:37970 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1nSx6k-0002TH-89 for geb-bug-gnu-emacs@m.gmane-mx.org; Sat, 12 Mar 2022 03:28:14 -0500 Original-Received: from eggs.gnu.org ([209.51.188.92]:43952) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nSx6Y-0002T2-Pr for bug-gnu-emacs@gnu.org; Sat, 12 Mar 2022 03:28:03 -0500 Original-Received: from debbugs.gnu.org ([209.51.188.43]:45154) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1nSx6Y-0001tx-H0 for bug-gnu-emacs@gnu.org; Sat, 12 Mar 2022 03:28:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1nSx6Y-0008KF-AF for bug-gnu-emacs@gnu.org; Sat, 12 Mar 2022 03:28:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: "J.P." Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 12 Mar 2022 08:28:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 54343 X-GNU-PR-Package: emacs Original-Received: via spool by 54343-submit@debbugs.gnu.org id=B54343.164707366031974 (code B ref 54343); Sat, 12 Mar 2022 08:28:02 +0000 Original-Received: (at 54343) by debbugs.gnu.org; 12 Mar 2022 08:27:40 +0000 Original-Received: from localhost ([127.0.0.1]:39051 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nSx6B-0008Je-Ng for submit@debbugs.gnu.org; Sat, 12 Mar 2022 03:27:39 -0500 Original-Received: from mail-108-mta119.mxroute.com ([136.175.108.119]:43147) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nSx69-0008JQ-8y for 54343@debbugs.gnu.org; Sat, 12 Mar 2022 03:27:38 -0500 Original-Received: from filter006.mxroute.com ([140.82.40.27] 140.82.40.27.vultrusercontent.com) (Authenticated sender: mN4UYu2MZsgR) by mail-108-mta119.mxroute.com (ZoneMTA) with ESMTPSA id 17f7d3d5e40000763e.001 for <54343@debbugs.gnu.org> (version=TLSv1/SSLv3 cipher=ECDHE-RSA-AES128-GCM-SHA256); Sat, 12 Mar 2022 08:27:28 +0000 X-Zone-Loop: 067e07bcf80ae2a7b15e894b9d008dd92c94794a8f3b X-Originating-IP: [140.82.40.27] DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=neverwas.me ; s=x; h=Content-Type:MIME-Version:Message-ID:In-Reply-To:Date:References: Subject:Cc:To:From:Sender:Reply-To:Content-Transfer-Encoding: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=3leDmyl2AqVYhvVbIA6X3zRcrdFRI0FIqYmAbzDIzVM=; b=VSZGBnkBIydWvrf6AEA12W2QQz OuEMZM/A18yaFnKFuw075bDEhAdMfZiB31uFQ8XnirS3Z0bxrCo8f9uOnljGQIz68cPBRqH3mPy1X szRRN8CurU4tflN8fsLwGoUIW56Qkn2q8kkqq4bCVXEKW0L8oXqvo0VCsUNcyOgCsNtEUvSF+ox2I 9ytbk8dWYZbDEVZ0VRDbFHbVVPrtar0fieIJT4F5aOcNZ6zQZISCSLAEEk+pbr978CwG0psig4seO FXn2tQGVD7107NKrsPpujhbyFkjFUZ3nYgM/bmcUGj4jt4SzmpAM4p5ZtahXggVQyuWLQUGQAZpoq bCWvwo9g==; In-Reply-To: <87wnh0dnyr.fsf@neverwas.me> (J. P.'s message of "Fri, 11 Mar 2022 16:16:44 -0800") X-AuthUser: masked@neverwas.me 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:228244 Archived-At: "J.P." writes: > seems to work with emacs -Q. (That rx form is bogus, BTW; it doesn't > retain the capture groups and probably has other bugs.) You're probably way ahead of me here, but I thought it prudent to reemphasize that evaluating that ugly demo expression is useless. If trying to convince yourself that splicing in a "cl-" prefix may be promising, please just modify the original `find-function-regexp' value instead: ""^\\s-*(\\(\\(?:cl-\\)?def\\(ine-skeleton...." ^ FWIW, this one may be slightly less atrocious: (let ((find-function-regexp (rx bol (* (syntax -)) "(" (group (| (: (? "cl-") "def" (group (| "ine-skeleton" "ine-generic-mode" "ine-derived-mode" (: "ine" (? "-global") "-minor-mode") "ine-compilation-mode" "un-cvs-mode" "foo" (: (| (not (in "icfgv")) (: "g" (not ?r))) (+ (group (| word (syntax symbol)))) (? ?*))))) (: "easy-mmode-define-" (+ (in (?a . ?z) ?-))) "easy-menu-define" "menu-bar-make-toggle" "menu-bar-make-toggle-command")) (+ (| (syntax -) "\n" (: ";" (* nonl) "\n"))) (? (group (| ?' "(quote "))) "%s" (group (| (syntax -) eol (in "()")))))) (find-function 'erc))