From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: "Paul W. Rankin" via "Emacs development discussions." Newsgroups: gmane.emacs.devel Subject: [PATCH v3] Improve find-sibling-rules option type Date: Mon, 2 Oct 2023 14:54:57 +1000 Message-ID: <20231002045524.59955-1-hello@paulwrankin.com> Reply-To: "Paul W. Rankin" 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="12739"; mail-complaints-to="usenet@ciao.gmane.io" Cc: "Paul W. Rankin" To: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Mon Oct 02 06:56:42 2023 Return-path: Envelope-to: ged-emacs-devel@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 1qnAz2-0002vy-G3 for ged-emacs-devel@m.gmane-mx.org; Mon, 02 Oct 2023 06:56:41 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1qnAyC-0007vQ-T4; Mon, 02 Oct 2023 00:55:48 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1qnAyB-0007vA-Do for emacs-devel@gnu.org; Mon, 02 Oct 2023 00:55:47 -0400 Original-Received: from sendmail.purelymail.com ([34.202.193.197]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1qnAy9-0007WM-Cr for emacs-devel@gnu.org; Mon, 02 Oct 2023 00:55:47 -0400 Authentication-Results: purelymail.com; auth=pass DKIM-Signature: a=rsa-sha256; b=nVukpLwsIjftBKlcKWdqhv/9D1BGLVbiJ91Ax2NylAYy5aowRgoFyxKsGTFGcBGWI71AD3Rhfkc2xkmHqz91rOSuW+H4OmqtnCZZLw/bIyo4g5vKDDP12nkNTByBBVCl6+tiyceZBCbHZsYuFHIkYYqpjyJrHFHNuZZapJb7kykW9pRDiOf55tCJrZMqTJ+qkE3tOSEBCLr7ij3cqUAKzAEqcue/48QZM/x6OWhEWqmLZGCB3Ah4bjq/f/ihF/+ActsOLv2tsdYREFgAJl7MIpfYvm6gASYi6H4ZLHZcCKBHrpjnVSo5ail1bfWyBqwrcSAqxJbmgGNkF5H3SHr7XQ==; s=purelymail1; d=paulwrankin.com; v=1; bh=r6Pe+xCQLspasX7jMZEG/MDUlhB/omgqxk8UUC0RahE=; h=Received:From:To:Subject; DKIM-Signature: a=rsa-sha256; b=cFkIsFEADIlI0wjaiSDoEwlBKOGBs8k2pklLm7ZCTXedF4qhO2oxoF86bRP8eeW9bhSB1GGf7RJ30SXfRrayMdS3TbnuUCEan/mt7883M9vAD92Rpl/lVPOtiLCMfEDShiIqRz6rAlPg72Jlk2lkHNwxGEOkuWQkpJM9krRL0LFeW5k5sbzq8Db9sr052aswHFwAoyL9xUDnkeWjAkyO8ykgLkX8kY3z05WV2gL1T4jsxMgkc19NzyO5nknLfb8YSaqjsw62N5pa/NriJoLwFVWZ5DrQRFcKomlOQRyXMrvqh7A63tFmxYiiPP5o3NJheADX47kipjpyT6TOTr3huQ==; s=purelymail1; d=purelymail.com; v=1; bh=r6Pe+xCQLspasX7jMZEG/MDUlhB/omgqxk8UUC0RahE=; h=Feedback-ID:Received:From:To:Subject; Feedback-ID: 791:353:null:purelymail X-Pm-Original-To: emacs-devel@gnu.org Original-Received: by smtp.purelymail.com (Purelymail SMTP) with ESMTPSA id -1713016291; (version=TLSv1.3 cipher=TLS_AES_256_GCM_SHA384); Mon, 02 Oct 2023 04:55:34 +0000 (UTC) X-Mailer: git-send-email 2.42.0 X-MIME-Autoconverted: from 8bit to quoted-printable by Purelymail Received-SPF: pass client-ip=34.202.193.197; envelope-from=hello@paulwrankin.com; helo=sendmail.purelymail.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.devel:311229 Archived-At: * lisp/files.el (find-sibling-rules): use alist with tags for custom type --- v3, make alist value a repeating string type. lisp/files.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/files.el b/lisp/files.el index 9d76668..eceed75 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -7572,7 +7572,8 @@ find-sibling-rules In this example, if you're in \"src/emacs/emacs-27/lisp/abbrev.el\", and a \"src/emacs/emacs-28/lisp/abbrev.el\" file exists, it's now defined as a sibling." - :type 'sexp + :type '(alist :key-type (regexp :tag "Match") + :value-type (repeat (string :tag "Expansion"))) :version "29.1") =20 (defun find-sibling-file (file) --=20 2.42.0