Received: (at 59438) by debbugs.gnu.org; 25 Nov 2022 01:16:04 +0000 From debbugs-submit-bounces <at> debbugs.gnu.org Thu Nov 24 20:16:04 2022 Received: from localhost ([127.0.0.1]:60675 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>) id 1oyNJz-0008UD-Vp for submit <at> debbugs.gnu.org; Thu, 24 Nov 2022 20:16:04 -0500 Received: from mail-oi1-f176.google.com ([209.85.167.176]:36630) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <stefankangas@HIDDEN>) id 1oyNJy-0008TZ-S1 for 59438 <at> debbugs.gnu.org; Thu, 24 Nov 2022 20:16:03 -0500 Received: by mail-oi1-f176.google.com with SMTP id s206so3045323oie.3 for <59438 <at> debbugs.gnu.org>; Thu, 24 Nov 2022 17:16:02 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=cc:to:subject:message-id:date:mime-version:references:in-reply-to :from:from:to:cc:subject:date:message-id:reply-to; bh=UjSiYtj5svcqrJyWVUbqoqzqwnij4NjI0+qaqkOiBJ0=; b=Wpt8UPxVjiI00kjteP4hmdxlnansFYducrriYFetsxUlom6tbJOCWVSe6xWx9rsFU2 XTKDJeI7LPrKGLTc+2kW7TpbHflJB2lBw2ZRF9Wcaimma3CrupT7e6c0H1FZ+YLR4oj9 QL+gz0VtEn4HliR34Wphfsjyrv8wPINN24Vw/EuuCEA8+enCbGGhlB2gttMoP7SIPNtX goo7ludw7e8eX7es0RAvsCKc8/AfTa7eQk0G7UAAc7aldM8t6KrWs2BGlUHCSk0EoNVd jM1TqD9U9Em7by0/LiTsqwEvbcRl0Wj6FAZG5LOPeoEqvIqm1M6rmJcuCTOfi2qQwI/j yATA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=cc:to:subject:message-id:date:mime-version:references:in-reply-to :from:x-gm-message-state:from:to:cc:subject:date:message-id:reply-to; bh=UjSiYtj5svcqrJyWVUbqoqzqwnij4NjI0+qaqkOiBJ0=; b=lCAV4YrQ7K4c2+Qa0deCooA2JNof4CXRRZT9fmqMCUBPBxYYQtRT6I/V92d7zaO3JZ L8JqZaQ/Ukj2wZeQTwPiT87aWhXq+qZaVtk9YYa9e6u/Uwj1V9v7CYHh16XqJKMWU7VO v0YnImJw/oViiFU/SBr+Q19phTDLksh/kJTyEC3mlry2jVq4OFT2lBo+RxKZao0xfDRm PhTJqnOtsjp5I2rtXxmJ579mtcxVjaiJpTGrGB2NLFWVBR0oCJJixr8EDsiHZrV5JwIl 0GpKyeJ79zi/kkgC9Kbj8LZ1KRJKdiA+kdCV+Bhaxpv5dubmdgvk05Kqe+dIqHs+W9ei IJEg== X-Gm-Message-State: ANoB5pnLPejQbsgY07p439JEFeewtFzp10S4xx7B9lCGc/MMHWiA+9O2 eaz3OCoh4WbQRiWGLgkIc0wgyGgH1rdJmsCiGnA= X-Google-Smtp-Source: AA0mqf4T4HCIoLC3LeKbJ+6/AXjEomIliI3Rpjk2HqiTPqs65lk3cXxU+395gohXX82sCGteG02CY0VikfRhsJ55Uzo= X-Received: by 2002:a05:6808:2229:b0:35b:2b17:af81 with SMTP id bd41-20020a056808222900b0035b2b17af81mr8007073oib.199.1669338957336; Thu, 24 Nov 2022 17:15:57 -0800 (PST) Received: from 753933720722 named unknown by gmailapi.google.com with HTTPREST; Thu, 24 Nov 2022 17:15:56 -0800 From: Stefan Kangas <stefankangas@HIDDEN> In-Reply-To: <SJ0PR06MB860970919EE7F0B0A8E645708B0A9@HIDDEN> (Gabriel's message of "Mon, 21 Nov 2022 06:25:17 -0300") References: <SJ0PR06MB860970919EE7F0B0A8E645708B0A9@HIDDEN> X-Hashcash: 1:20:221125:juri@HIDDEN::JBwDVW0CQbj9xbRD:QWB MIME-Version: 1.0 Date: Thu, 24 Nov 2022 17:15:56 -0800 Message-ID: <CADwFkm=74_r2ddOw_ebexBG1PG2J_SGgDeZNfMMjyYTF5Rvxug@HIDDEN> Subject: Re: bug#59438: 29.0.50; [PATCH] Make defvar's into defcustom's in tab-line To: Gabriel <gabriel376@HIDDEN> Content-Type: text/plain; charset="UTF-8" X-Spam-Score: 0.0 (/) X-Debbugs-Envelope-To: 59438 Cc: 59438 <at> debbugs.gnu.org, Juri Linkov <juri@HIDDEN> X-BeenThere: debbugs-submit <at> debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: <debbugs-submit.debbugs.gnu.org> List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe> List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/> List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org> List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help> List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe> Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org> X-Spam-Score: -1.0 (-) Gabriel <gabriel376@HIDDEN> writes: > Please find attached a patch that proposes the following minor changes > to tab-line. I can refactor the patch if we decide that some change are > not worth or if it's better to split it into smaller patches. > > 1) Turn the following defvar's into defcustom's: > > - `tab-line-tabs-buffer-group-function' > - `tab-line-tabs-buffer-group-sort-function' > - `tab-line-tabs-buffer-groups-sort-function' > > 2) Add conditional around function call of > `tab-line-tabs-buffer-groups-sort-function', in > `tab-line-tabs-buffer-groups'. This guards against nil values, similar > to how `tab-line-tabs-buffer-group-sort-function is handled, making the > behavior more consistent across these two (similar) variables. > > Should we announce these "new" defcustom's in NEWS? Juri, thoughts?
bug-gnu-emacs@HIDDEN:bug#59438; Package emacs.
Full text available.Stefan Kangas <stefankangas@HIDDEN>
to control <at> debbugs.gnu.org.
Full text available.
Received: (at submit) by debbugs.gnu.org; 21 Nov 2022 09:29:13 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Mon Nov 21 04:29:13 2022
Received: from localhost ([127.0.0.1]:45440 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1ox373-0004PT-5U
for submit <at> debbugs.gnu.org; Mon, 21 Nov 2022 04:29:13 -0500
Received: from lists.gnu.org ([209.51.188.17]:44938)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <gabriel376@HIDDEN>) id 1ox36x-0004PI-Pl
for submit <at> debbugs.gnu.org; Mon, 21 Nov 2022 04:29:11 -0500
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 <gabriel376@HIDDEN>)
id 1ox36x-0002VJ-7H
for bug-gnu-emacs@HIDDEN; Mon, 21 Nov 2022 04:29:07 -0500
Received: from mail-bn8nam04olkn2108.outbound.protection.outlook.com
([40.92.47.108] helo=NAM04-BN8-obe.outbound.protection.outlook.com)
by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
(Exim 4.90_1) (envelope-from <gabriel376@HIDDEN>)
id 1ox36q-0001FM-Ha
for bug-gnu-emacs@HIDDEN; Mon, 21 Nov 2022 04:29:06 -0500
ARC-Seal: i=1; a=rsa-sha256; s=arcselector9901; d=microsoft.com; cv=none;
b=TTd//uUGajIn8njrWZ1xpkcvO5+WGsqDomJu6F9zg+6EQnbRVTPMNIfeFzE81cbMAyhrz1b3RsmbMV8SjXTrySmGoMLZVmjaxPDcb+ImVvV4qdRnechYlGMxAOHj8+R9w1K1i6BnfmJr66GO1XCmc7yGOerfkap9aiu63erLIaRLtEcNE2YsVEvjLR2zMDPg6HCYj5ODYjaLBnsChSiqSSNd5FVmHaADUexPEYo/eV7IcjpMz7dS9WSH2YYmp9l2yYg8q3Du+u0JbhCJf1TgkBDr6PzJFQgOc0ISzx8esXzZnUFCn8Ce0vVKTV0tk4D99nXmEIV5nDbKepyiseTxyw==
ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=microsoft.com;
s=arcselector9901;
h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-AntiSpam-MessageData-ChunkCount:X-MS-Exchange-AntiSpam-MessageData-0:X-MS-Exchange-AntiSpam-MessageData-1;
bh=MTJ5Tf/znQ/0Kc0nMD2fVgZw81rGIFZN8euc0/agVHg=;
b=WIqceF9U15nF5JBa+PjMw0KDFRvM6uu73nOA6pS3YbfbFO0r+9RtDKMRdK985AcLAosyfi31cNOweUOxzKv+SpxwNeJb6GE4wu2s6y1njamKeHx5LN9s6sTz95jX6Bpw/Xpx4bCyL3DZ2cYbnqspbP4ZQYIgzC1eu6qviZ8PzTSf4sbEWwNa9z47a3apcyw+/ere4vLc2tnBJTSty5zlPNbqOoRObiVKzt9/9Dv1il+cW/c8iz/VxIYXubA9ZLuiI4hTHaD9+78sPXr4hzH4HA4l4XYQmeaD5RbCh8WuIGUPQiScFXlanS+d/1eTm/lEpI1s9TyWMeTy2CKbOcqPHQ==
ARC-Authentication-Results: i=1; mx.microsoft.com 1; spf=none; dmarc=none;
dkim=none; arc=none
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=hotmail.com;
s=selector1;
h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-SenderADCheck;
bh=MTJ5Tf/znQ/0Kc0nMD2fVgZw81rGIFZN8euc0/agVHg=;
b=s4wSxRYXYZlhDXp+ZVfou3JP9kt4qZLoCERd8d15rXsO0FscjkLxbh9LgUjD/DCyqf5M30dAyZpZ1/Twarv+hCF97t+HbIMGrZlOBAmOtSMpD4xzOJRD/1Ku3/VihvzCWEUYt5RtFq5q4L0PtlL7TsXvgxH1T2TlxsdOkRlEGIcs6sqqOgzbK3rOc2uHolXBGHj9ImuerEhHTM5w5lkchoSHuQ6Iq0dIUJEe5YJwixCUp51CVX4/xtZ95wiFJxMuCx9z+Oth1o43x/Tvg2sGGJZJ5PjGPMjs9cAb5Xjt1i5H4VFEvkNC0aX8jqAkUOb+Z0o7kyPVN8eTE2ZzTNnfZw==
Received: from SJ0PR06MB8609.namprd06.prod.outlook.com (2603:10b6:a03:40c::11)
by SJ0PR06MB7471.namprd06.prod.outlook.com (2603:10b6:a03:32d::22)
with Microsoft SMTP Server (version=TLS1_2,
cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id 15.20.5857.17; Mon, 21 Nov
2022 09:25:24 +0000
Received: from SJ0PR06MB8609.namprd06.prod.outlook.com
([fe80::33ae:d3a7:24ae:5c6f]) by SJ0PR06MB8609.namprd06.prod.outlook.com
([fe80::33ae:d3a7:24ae:5c6f%4]) with mapi id 15.20.5857.017; Mon, 21 Nov 2022
09:25:24 +0000
From: Gabriel <gabriel376@HIDDEN>
To: bug-gnu-emacs@HIDDEN
Subject: 29.0.50; [PATCH] Make defvar's into defcustom's in tab-line
Date: Mon, 21 Nov 2022 06:25:17 -0300
Message-ID: <SJ0PR06MB860970919EE7F0B0A8E645708B0A9@HIDDEN>
Content-Type: multipart/mixed; boundary="=-=-="
X-TMN: [iQ+vraUXZ5IjxuIWGxejnx3J1UdHS9UCkqVLxzY/0zxRdgMm/phm5Nlye/r3kc4A]
X-ClientProxiedBy: CPYP284CA0025.BRAP284.PROD.OUTLOOK.COM
(2603:10d6:103:69::12) To SJ0PR06MB8609.namprd06.prod.outlook.com
(2603:10b6:a03:40c::11)
X-Microsoft-Original-Message-ID: <87leo4acci.fsf@HIDDEN>
MIME-Version: 1.0
X-MS-Exchange-MessageSentRepresentingType: 1
X-MS-PublicTrafficType: Email
X-MS-TrafficTypeDiagnostic: SJ0PR06MB8609:EE_|SJ0PR06MB7471:EE_
X-MS-Office365-Filtering-Correlation-Id: c3f0aa96-7cca-4a55-f0bf-08dacba251b3
X-Microsoft-Antispam: BCL:0;
X-Microsoft-Antispam-Message-Info: YVX6KGD+00N1TNNkrKu+YWvg3PDWe4zQFpPEdQG2Zx0tjEkiP6+dk/m6Qbxu/jlQPQXjDHQSbYx74caOSgfs19XT/1hlkIxUcQYaMKNELPI3WkAIJc0aTntkifH/h6Hyc646m86mAFxuM3BqVpre5Ueelj9w45XaKekHIM3r3Ur2wSWev6Vxp9O/a67ZT01CJbuZJweqhhG7cpqJjNB0o/QglBmBgw4hsX/PktN/m2rDfNa2HsZyaWWrzShkZ1bcF828qDvxx9RkrpbiIWqIPf2KrY/3MAqh0GfNIJQnjcQQlyNjW1DdHMFxJH8nNofLDTLTfpdCmav9vyv6CkPzfovqRs8IXdKD09oBT4XmLdNYV+TkeuY/8TLG1bPSBSso+mZa0ZnwOOFpA6BkgcrE6sGNmerEt6Fa9nCZ/TW82RkbSgAbd2mKdI3b7+//7CfrfiPxv02Q/f7Gj5n/gRDlfd0/hRZJ4J1Ns8fNkeUwEVlyrc63Cl/hTcunn/jWfC6Z9Nn4Gc29BMhPWvvpx6m4V73wmTLccNzwv+O/8aeb47M2DHD7fcN81myp1L4ogWVJ4YWRsK7U5BUYhZvjy/PKNt/bttR8K5MoI8ExeTeBUcM=
X-MS-Exchange-AntiSpam-MessageData-ChunkCount: 1
X-MS-Exchange-AntiSpam-MessageData-0: =?us-ascii?Q?MyGU9lQ75wRzrD4e3Xb16MG31x+gruxNhZ0HTy5wysh+kKhUpvkoA5wh8y/S?=
=?us-ascii?Q?5YBnwP4JYLSo4RqbPlWcTiRkOhjMGMFj0/5hRPdQiE4PgE/VMA8tKWnR9eUV?=
=?us-ascii?Q?mKXxzmNZSaQlNKprbsr0lLnTZWWXWO798Q1jUmMuGEgRcJLTx88r8i3GrTbY?=
=?us-ascii?Q?TfPTCR4VF58TEfqPnEOCxGCSDnZMqILuNgSEeGO8s1o/7KmhUCO0MtTyrpDw?=
=?us-ascii?Q?K24w1aInQoiJXp7smja6ukOy2Ia4kd6o+tK9JDlZnETT0Fhz6G5qNNa71eE4?=
=?us-ascii?Q?U2QMZ8f8i+X7JoK12zeJ7qVk7ELVjH8YQhASvvxQEFhqeHRYfWC+vMBN0kE6?=
=?us-ascii?Q?b56GbeG9mlF7qc4BHht0l4VBRVPgueY/VYhTWtNXMbSqquei6/ZJn0sJ2cqW?=
=?us-ascii?Q?oF+ihL+KntWe0hPB+g1fB8NesbSKhWc+A3pZz/QdmpqT8PcpjzbvkifGjtJu?=
=?us-ascii?Q?AlINdREkYuzZYE7j6PXbFm0a3dEmJnJJrCRIBzHkhZqtmTVmSVxXjM0evP7+?=
=?us-ascii?Q?CBFu2fV/Yu+jVmljMEI2m9JIW56bAOUu/1FgsAqXZ2V7ljKRC3fdIvvkJ2TN?=
=?us-ascii?Q?Q1nE2uZh5aEV10YbOgNsbdM45rglUW7Q3qATPHX62lj4odjjEszR3El/UqP8?=
=?us-ascii?Q?ccr4oWu1b0n+SWmKGihDYTZndRLxEuCr/6NwxArCw2W7/k3pAtKyM3jyzoA2?=
=?us-ascii?Q?mlspQZejGZrj5LoLSTa20aW+sx8tXw/IHkkvZJ6OWLSN1y7sQ1OIiqHKinPo?=
=?us-ascii?Q?4JSzN8QBdkiRprWzVQn+HyWr23FPNST6wv8hxNp4O/kNcPSWfEeN1AUHt58V?=
=?us-ascii?Q?X0FDdT9AAFsm6nxbaKEHBxFzsMlgG+KfdUosSEMK5gIXYMLiGVTfk7R2lZg3?=
=?us-ascii?Q?4j8hMrNTYqJoUJkWBurY6e0sZQF0rcGZsS/wEbgu2vmavgyyHip1ZZmSD9cy?=
=?us-ascii?Q?W8FkAuNLBQD2d9ub6s/dgXklc185HnH2BII5YvE3Rg6YNKHl0rM+rVapmPXK?=
=?us-ascii?Q?ZSQSwfvKASenNaSftfygBicyj63RbsaLHNAsAE825/C7uSxAyfPtv4owg6rD?=
=?us-ascii?Q?tjRfRE5RButETLNDLPM7/nm9qcyoVmfh38T9C6njv6H9YmH8yZABZfa4IO7e?=
=?us-ascii?Q?xdQb065h6acs9PByisoxk0UXDEj2fU0ty19+Wp3wbJ9vzTaPBlOl1shPyzxf?=
=?us-ascii?Q?T15MtfZ6+Y5J6EtoJKnavR/Wm5QlgisNUIxmjUKs5S1e7igELToboYXIFz7a?=
=?us-ascii?Q?SNT5iPMTe9BMwSBjT+W2Fl2iV4tuQo2kF4ni7oTpGlFH25rYPvJUM+TBuuzZ?=
=?us-ascii?Q?2lDeYWjlBOGfUheO0gpPLOJBiZYRL8X090+BBHCb+wtnlA=3D=3D?=
X-OriginatorOrg: sct-15-20-4755-11-msonline-outlook-89723.templateTenant
X-MS-Exchange-CrossTenant-Network-Message-Id: c3f0aa96-7cca-4a55-f0bf-08dacba251b3
X-MS-Exchange-CrossTenant-AuthSource: SJ0PR06MB8609.namprd06.prod.outlook.com
X-MS-Exchange-CrossTenant-AuthAs: Internal
X-MS-Exchange-CrossTenant-OriginalArrivalTime: 21 Nov 2022 09:25:24.8326 (UTC)
X-MS-Exchange-CrossTenant-FromEntityHeader: Hosted
X-MS-Exchange-CrossTenant-Id: 84df9e7f-e9f6-40af-b435-aaaaaaaaaaaa
X-MS-Exchange-CrossTenant-RMS-PersistedConsumerOrg: 00000000-0000-0000-0000-000000000000
X-MS-Exchange-Transport-CrossTenantHeadersStamped: SJ0PR06MB7471
Received-SPF: pass client-ip=40.92.47.108; envelope-from=gabriel376@HIDDEN;
helo=NAM04-BN8-obe.outbound.protection.outlook.com
X-Spam_score_int: -18
X-Spam_score: -1.9
X-Spam_bar: -
X-Spam_report: (-1.9 / 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,
FREEMAIL_ENVFROM_END_DIGIT=0.25, FREEMAIL_FROM=0.001,
RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_PASS=-0.001,
SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -1.1 (-)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.1 (--)
--=-=-=
Content-Type: text/plain
Description:
Please find attached a patch that proposes the following minor changes
to tab-line. I can refactor the patch if we decide that some change are
not worth or if it's better to split it into smaller patches.
1) Turn the following defvar's into defcustom's:
- `tab-line-tabs-buffer-group-function'
- `tab-line-tabs-buffer-group-sort-function'
- `tab-line-tabs-buffer-groups-sort-function'
2) Add conditional around function call of
`tab-line-tabs-buffer-groups-sort-function', in
`tab-line-tabs-buffer-groups'. This guards against nil values, similar
to how `tab-line-tabs-buffer-group-sort-function is handled, making the
behavior more consistent across these two (similar) variables.
Should we announce these "new" defcustom's in NEWS?
--=-=-=
Content-Type: text/x-diff
Content-Disposition: attachment;
filename=0001-Make-defvar-s-into-defcustom-s-in-tab-line.patch
From da1053e7211d8bb17769fe43650a9bcdd359aeab Mon Sep 17 00:00:00 2001
From: Gabriel do Nascimento Ribeiro <gabriel376@HIDDEN>
Date: Mon, 21 Nov 2022 06:17:49 -0300
Subject: [PATCH 1/1] Make defvar's into defcustom's in tab-line
* lisp/tab-line.el (tab-line-tabs-buffer-group-function)
(tab-line-tabs-buffer-group-sort-function)
(tab-line-tabs-buffer-groups-sort-function): Make into defcustom's.
(Make defvar's into defcustom's in tab-line): Handle case when
variable tab-line-tabs-buffer-groups-sort-function is nil.
---
lisp/tab-line.el | 51 ++++++++++++++++++++++++++++--------------------
1 file changed, 30 insertions(+), 21 deletions(-)
diff --git a/lisp/tab-line.el b/lisp/tab-line.el
index 99a785ee3e..9b1c101718 100644
--- a/lisp/tab-line.el
+++ b/lisp/tab-line.el
@@ -341,16 +341,26 @@ tab-line-tabs-mode-buffers
(derived-mode-p mode)))
(funcall tab-line-tabs-buffer-list-function)))))
-(defvar tab-line-tabs-buffer-group-function nil
+(defcustom tab-line-tabs-buffer-group-function nil
"Function to add a buffer to the appropriate group of tabs.
-Takes a buffer as arg and should return a group name as a string.
-If the return value is nil, the buffer should be filtered out.")
+Takes a buffer as argument and should return a group name as a
+string. If the return value is nil, the buffer should be
+ filtered out."
+ :type 'function
+ :group 'tab-line
+ :version "29.1")
-(defvar tab-line-tabs-buffer-group-sort-function nil
- "Function to sort buffers in a group.")
+(defcustom tab-line-tabs-buffer-group-sort-function nil
+ "Function to sort buffers in a group."
+ :type 'function
+ :group 'tab-line
+ :version "29.1")
-(defvar tab-line-tabs-buffer-groups-sort-function #'string<
- "Function to sort group names.")
+(defcustom tab-line-tabs-buffer-groups-sort-function #'string<
+ "Function to sort group names."
+ :type 'function
+ :group 'tab-line
+ :version "29.1")
(defvar tab-line-tabs-buffer-groups mouse-buffer-menu-mode-groups
"How to group various major modes together in the tab line.
@@ -378,13 +388,14 @@ tab-line-tabs-buffer-groups
generate the group name."
(if (window-parameter nil 'tab-line-groups)
(let* ((buffers (funcall tab-line-tabs-buffer-list-function))
- (groups
- (seq-sort tab-line-tabs-buffer-groups-sort-function
- (delq nil (mapcar #'car (seq-group-by
- (lambda (buffer)
- (tab-line-tabs-buffer-group-name
- buffer))
- buffers)))))
+ (groups (delq nil
+ (mapcar #'car
+ (seq-group-by #'tab-line-tabs-buffer-group-name
+ buffers))))
+ (sorted-groups (if (functionp tab-line-tabs-buffer-groups-sort-function)
+ (seq-sort tab-line-tabs-buffer-groups-sort-function
+ groups)
+ groups))
(selected-group (window-parameter nil 'tab-line-group))
(tabs
(mapcar (lambda (group)
@@ -395,9 +406,8 @@ tab-line-tabs-buffer-groups
(set-window-parameter nil 'tab-line-groups nil)
(set-window-parameter nil 'tab-line-group group)
(set-window-parameter nil 'tab-line-hscroll nil)))))
- groups)))
- tabs)
-
+ sorted-groups)))
+ tabs)
(let* ((window-parameter (window-parameter nil 'tab-line-group))
(group-name (tab-line-tabs-buffer-group-name (current-buffer)))
(group (prog1 (or window-parameter group-name "All")
@@ -410,10 +420,9 @@ tab-line-tabs-buffer-groups
(set-window-parameter nil 'tab-line-groups t)
(set-window-parameter nil 'tab-line-group group)
(set-window-parameter nil 'tab-line-hscroll nil)))))
- (buffers
- (seq-filter (lambda (b)
- (equal (tab-line-tabs-buffer-group-name b) group))
- (funcall tab-line-tabs-buffer-list-function)))
+ (buffers (seq-filter (lambda (b)
+ (equal (tab-line-tabs-buffer-group-name b) group))
+ (funcall tab-line-tabs-buffer-list-function)))
(sorted-buffers (if (functionp tab-line-tabs-buffer-group-sort-function)
(seq-sort tab-line-tabs-buffer-group-sort-function
buffers)
--
2.34.1
--=-=-=
Content-Type: text/plain
---
Gabriel
--=-=-=--
Gabriel <gabriel376@HIDDEN>:bug-gnu-emacs@HIDDEN.
Full text available.bug-gnu-emacs@HIDDEN:bug#59438; Package emacs.
Full text available.
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997 nCipher Corporation Ltd,
1994-97 Ian Jackson.