From unknown Wed Jun 25 09:12:01 2025 X-Loop: help-debbugs@gnu.org Subject: bug#61661: 30.0.50; [PATCH] Define 'appt-notification' face Resent-From: Protesilaos Stavrou Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 20 Feb 2023 19:16:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 61661 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch To: 61661@debbugs.gnu.org X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.167692054911795 (code B ref -1); Mon, 20 Feb 2023 19:16:02 +0000 Received: (at submit) by debbugs.gnu.org; 20 Feb 2023 19:15:49 +0000 Received: from localhost ([127.0.0.1]:53675 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pUBdd-00034A-E4 for submit@debbugs.gnu.org; Mon, 20 Feb 2023 14:15:49 -0500 Received: from lists.gnu.org ([209.51.188.17]:41164) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pUBda-00033w-5p for submit@debbugs.gnu.org; Mon, 20 Feb 2023 14:15:47 -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 ) id 1pUBdA-00042l-HA for bug-gnu-emacs@gnu.org; Mon, 20 Feb 2023 14:15:32 -0500 Received: from relay8-d.mail.gandi.net ([217.70.183.201]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1pUBd8-0002wk-0v for bug-gnu-emacs@gnu.org; Mon, 20 Feb 2023 14:15:20 -0500 Received: (Authenticated sender: public@protesilaos.com) by mail.gandi.net (Postfix) with ESMTPSA id 9E95F1BF203 for ; Mon, 20 Feb 2023 19:15:13 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=protesilaos.com; s=gm1; t=1676920513; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:mime-version:mime-version:content-type:content-type; bh=dAYI/t2H7NmJ5ETQaOnE73gQ3xJ8hX2GmApdpHpDS+Y=; b=ElGKJX9Q8H3DKm36u6mdTPIqd6fL87lHn/C/vownI/hJiXhK+paSjhQ3D6vV27K/vWbkYB obM/taYlexL+977apQc3rb3QkpkOkNU9BvkgQmWJunm93TC5oGJuCU0htPwYtKHWahrvw5 UI3AEiHJK68Lpy4jYAIxV+O19PEt6LF5+XlDjiNbVnCprkngPFNby5khuW51t3uXj4bKev ZZiVr1Cp6T5rzPSo9oB7A4KK3Fp9IUr50ddUAPECM0cECeKy7kFlSifYlEVvVmxewcTSMt eZ1eBPc+P2d4KCpjDPPphK5Zpe2trvjQWkmRs6FZpli1pOOuiWbAaVxzyMyKJw== From: Protesilaos Stavrou Date: Mon, 20 Feb 2023 21:15:12 +0200 Message-ID: <874jrgdu7z.fsf@protesilaos.com> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Received-SPF: none client-ip=217.70.183.201; envelope-from=info@protesilaos.com; helo=relay8-d.mail.gandi.net X-Spam_score_int: -23 X-Spam_score: -2.4 X-Spam_bar: -- X-Spam_report: (-2.4 / 5.0 requ) BAYES_00=-1.9, DKIM_INVALID=0.1, DKIM_SIGNED=0.1, RCVD_IN_DNSWL_LOW=-0.7, SPF_HELO_NONE=0.001, SPF_NONE=0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) --=-=-= Content-Type: text/plain Dear maintainers, The appt.el library can show a notification for upcoming appointments on the mode line. The face it uses is hardcoded to 'mode-line-emphasis' which, by default, is a bold weight. With the attached patch, we have a new face that the user/theme can set to something easier to spot like bold+red. Decoupling this indicator from the generic 'mode-line-emphasis' allows us to add extra styling only to the notification without affecting other parts of the mode line that may be using 'mode-line-emphasis'. What do you think? All the best, Protesilaos (or simply "Prot") -- Protesilaos Stavrou https://protesilaos.com --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-Add-appt-notification-face.patch >From 02a8768e4e81b8a645b81cb4864387bf4422bcfe Mon Sep 17 00:00:00 2001 Message-Id: <02a8768e4e81b8a645b81cb4864387bf4422bcfe.1676919809.git.info@protesilaos.com> From: Protesilaos Stavrou Date: Mon, 20 Feb 2023 21:03:08 +0200 Subject: [PATCH] Add 'appt-notification' face * etc/NEWS: Announce the new face. * lisp/calendar/appt.el (appt-notification): Declare the new face. (appt-check): Implement the new face. --- etc/NEWS | 6 ++++++ lisp/calendar/appt.el | 8 +++++++- 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/etc/NEWS b/etc/NEWS index bcce416ebc1..04fe60be493 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -61,6 +61,12 @@ This allows the user to customize the prompt that is appended by This is used for displaying the time and date components of 'display-time-mode'. +--- +** New face 'appt-notification'. +This is used for the warning message when 'appt-display-mode-line' is +non-nil. + + * Editing Changes in Emacs 30.1 diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el index 49597739446..3c2d7fee24b 100644 --- a/lisp/calendar/appt.el +++ b/lisp/calendar/appt.el @@ -165,6 +165,12 @@ (defcustom appt-delete-window-function #'appt-delete-window :type 'function :group 'appt) +(defface appt-notification + '((t :inherit mode-line-emphasis)) + "Face for appointment notification on the modeline. +Shown when `appt-display-mode-line' is non-nil." + :group 'mode-line-faces + :version "30.1") ;;; Internal variables below this point. @@ -406,7 +412,7 @@ (defun appt-check (&optional force) (appt-mode-line (mapcar #'number-to-string min-list) t) - 'face 'mode-line-emphasis) + 'face 'appt-notification) " "))) ;; Reset count to 0 in case we display another appt on the next cycle. (setq appt-display-count (if (equal '(0) min-list) 0 -- 2.39.2 --=-=-=-- From debbugs-submit-bounces@debbugs.gnu.org Mon Sep 04 04:58:10 2023 Received: (at control) by debbugs.gnu.org; 4 Sep 2023 08:58:10 +0000 Received: from localhost ([127.0.0.1]:48568 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qd5PO-0003Fv-4k for submit@debbugs.gnu.org; Mon, 04 Sep 2023 04:58:10 -0400 Received: from mail-lf1-x136.google.com ([2a00:1450:4864:20::136]:61442) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qd5PJ-0003F3-Sv for control@debbugs.gnu.org; Mon, 04 Sep 2023 04:58:09 -0400 Received: by mail-lf1-x136.google.com with SMTP id 2adb3069b0e04-4ff09632194so2034730e87.2 for ; Mon, 04 Sep 2023 01:58:05 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20221208; t=1693817880; x=1694422680; darn=debbugs.gnu.org; h=to:subject:message-id:date:mime-version:from:from:to:cc:subject :date:message-id:reply-to; bh=TO+oqYZM0gA1a1Id961KCFKn093txM7hXVeJu4dlf50=; b=cH4qEXQFVJ/dMGjvwOj8PBYqWhKJJmwdjjR+lUjPIiXyGGsE01JEOjJ5to8xe3NeYH J3u0gLF9S1b3DltAPiIoYz9AeVCv5mvOhuMaq7zbojXmtqIA3s6kaxa+TlKAqMbCgLep M0il3sMQxgOiMU+GE+ypCed6vmZWubr1lIEV7/LHkQdoBqjGmxboQHvlegt61nQ8bdM4 0Ss6VgVv25uq5q5O6wGa43ux4o2yO70VxDYKe6fsQf9Ja25rDa+LrCo5AqQw19TsAJ+b nT2nWF9vGUvUUYbgqg1ma5r7G6S+Qm01+qLCVcdejtqqeusRqhNrA7OOvwnM6G0JKmPm Hdyg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20221208; t=1693817880; x=1694422680; h=to:subject:message-id:date:mime-version:from:x-gm-message-state :from:to:cc:subject:date:message-id:reply-to; bh=TO+oqYZM0gA1a1Id961KCFKn093txM7hXVeJu4dlf50=; b=JeWVFvQQS7Ax0E1WSHR8qcIqEcBp6jep/gaGP4WoBMrWDyufUBFBoTZXGMkRLZYrmM S6qZsxIoPsZ0ysR3KwPNgW3FCJg1HBAZ2Zsil5rxHY1VE0OeaE239fYhTC5ei6SGozvN nGTpFzgVGu1Ef/mNMTyLAeg+U1nBuQiqM7gaSAgWU1zKoA5B1tEetMwYjYmgNH1Tqlsd VRNRpP3C31R3SHeC4al4hJ5IIlJY8XYVTORhsj4nZ9BCIlhVc2JG6TRlga4kN7LoK2jv WrZBNAX7dJhlQJ6E4T1gfmXDUZnV2DtHCLKPZnZIuMYNvMyTQSu/7eKMbwdFPAiGfGPN C9LA== X-Gm-Message-State: AOJu0YzJSgAtUJ2HwD0J2QTg5ns6soNRhFAmWfJx5hZeUeCMScURQiQm 7et/4aRdh89Z8S87uYEu1OGLyHt+6k8nAxA+jSZ8nrEE9j0= X-Google-Smtp-Source: AGHT+IEhbs1g43hkxZMc7bMzL4OQCDNa89Nao5sEUsyznoGNmBdSf2lXTHlhMNj0beJuuZ9sC07K3+dRxYrYk+7ha+E= X-Received: by 2002:a05:6512:33d5:b0:4f8:631b:bf77 with SMTP id d21-20020a05651233d500b004f8631bbf77mr7504208lfg.22.1693817880033; Mon, 04 Sep 2023 01:58:00 -0700 (PDT) Received: from 753933720722 named unknown by gmailapi.google.com with HTTPREST; Mon, 4 Sep 2023 01:57:59 -0700 From: Stefan Kangas MIME-Version: 1.0 Date: Mon, 4 Sep 2023 01:57:59 -0700 Message-ID: Subject: control message for bug #61661 To: control@debbugs.gnu.org Content-Type: text/plain; charset="UTF-8" X-Spam-Score: 0.0 (/) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) severity 61661 wishlist quit From unknown Wed Jun 25 09:12:01 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Protesilaos Stavrou Subject: bug#61661: closed (Re: bug#61661: 30.0.50; [PATCH] Define 'appt-notification' face) Message-ID: References: <874jrgdu7z.fsf@protesilaos.com> X-Gnu-PR-Message: they-closed 61661 X-Gnu-PR-Package: emacs X-Gnu-PR-Keywords: patch Reply-To: 61661@debbugs.gnu.org Date: Mon, 04 Sep 2023 20:52:02 +0000 Content-Type: multipart/mixed; boundary="----------=_1693860722-21252-1" This is a multi-part message in MIME format... ------------=_1693860722-21252-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #61661: 30.0.50; [PATCH] Define 'appt-notification' face which was filed against the emacs package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 61661@debbugs.gnu.org. --=20 61661: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D61661 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1693860722-21252-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 61661-done) by debbugs.gnu.org; 4 Sep 2023 20:51:55 +0000 Received: from localhost ([127.0.0.1]:52759 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qdGY6-0005WP-RJ for submit@debbugs.gnu.org; Mon, 04 Sep 2023 16:51:55 -0400 Received: from mail-lf1-x12e.google.com ([2a00:1450:4864:20::12e]:60866) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qdGY2-0005W7-Sa for 61661-done@debbugs.gnu.org; Mon, 04 Sep 2023 16:51:53 -0400 Received: by mail-lf1-x12e.google.com with SMTP id 2adb3069b0e04-50087d47d4dso3083299e87.1 for <61661-done@debbugs.gnu.org>; Mon, 04 Sep 2023 13:51:50 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20221208; t=1693860704; x=1694465504; darn=debbugs.gnu.org; h=cc:to:subject:message-id:date:mime-version:references:in-reply-to :from:from:to:cc:subject:date:message-id:reply-to; bh=2PvMd60HPcWiIhdi3voMOen7GrljeaJKEi6Jw87Ojws=; b=bYkH+kqA6mbN79ipyV2wGolCJQ4sJLZBnyScjfBtqzzGXykG9/kkBEg5Zb2xsUnYI8 7oeWgwkJKy6H5gvD9sP1W5XE40wuO1/eV8kUhJGYPkx/UN0hMUV87ZI4cIUAL5e6IvmI JYWsL5rcxxl+0G+guD7cz5bkMYipOI6XZerL6yu3gHpF0e4yroH6Ae9X3RC/LUOj3fRS 5i4nAM+jpbmzzLiBUeeYtm/8ZOF99tffBQ19fA6rCZ23uvi5FV/44GxRJVLvKXVt/BDd 5KzfDv/6gd5g9CnlZTT228J7y6Zm3Xa2F9NL3/NcVb5NBVqckBm+FwREgjOilkIqZUPw r69A== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20221208; t=1693860704; x=1694465504; 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=2PvMd60HPcWiIhdi3voMOen7GrljeaJKEi6Jw87Ojws=; b=cGhw2WGPuaE6jAlc/Yd5orlpa+gN32C6+xyIwZfqy5bAXXzESUzTJ+lN9OLdbTHA73 RFFY1htPtBX/wZd3FBJqvLrfwXR78EENk9CBfGIwZHRutl+3HaLge7ADUjkoTCkMCRqW bvE3RKzTxER4JdqUpyyhUJgdQGOk70MAKNxZcYfC2iyY0YLg731ljlIkCKffCZiN/wNS soxH+YM35frhj7VjwZcr/H2I17mJLuE4yXTrYcizL4lkR+VaKSwHFhPjbqf3jqWCrboi iZAHti5du5pgU0SV+i/T0q1a+6nILwaYo9ixtxpqryiTJm7YhxDQep8IQQd51TZOL5IW pHxQ== X-Gm-Message-State: AOJu0YyP3Na0eoESITaVI49FAqXkYYtJE/R5u2ix1KjajxDrfZPKn8og Kh54HirdsR24BEh9odhWHRjtG1k1V07/NDRDLN9GacOt X-Google-Smtp-Source: AGHT+IE6Tn+gAY8b70uIZ3VuyOh2rNQWB+9ei2gi24T3CENlXAURGWmUTftZ07ffEUrT/xNw8rg/6doP7KNifJ71xQM= X-Received: by 2002:a05:6512:10c7:b0:500:cb2b:8678 with SMTP id k7-20020a05651210c700b00500cb2b8678mr9131064lfg.40.1693860704447; Mon, 04 Sep 2023 13:51:44 -0700 (PDT) Received: from 753933720722 named unknown by gmailapi.google.com with HTTPREST; Mon, 4 Sep 2023 13:51:44 -0700 From: Stefan Kangas In-Reply-To: <874jrgdu7z.fsf@protesilaos.com> (Protesilaos Stavrou's message of "Mon, 20 Feb 2023 21:15:12 +0200") References: <874jrgdu7z.fsf@protesilaos.com> MIME-Version: 1.0 Date: Mon, 4 Sep 2023 13:51:44 -0700 Message-ID: Subject: Re: bug#61661: 30.0.50; [PATCH] Define 'appt-notification' face To: Protesilaos Stavrou Content-Type: text/plain; charset="UTF-8" X-Spam-Score: 0.0 (/) X-Debbugs-Envelope-To: 61661-done Cc: 61661-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) Protesilaos Stavrou writes: > The appt.el library can show a notification for upcoming appointments on > the mode line. The face it uses is hardcoded to 'mode-line-emphasis' > which, by default, is a bold weight. > > With the attached patch, we have a new face that the user/theme can set > to something easier to spot like bold+red. Decoupling this indicator > from the generic 'mode-line-emphasis' allows us to add extra styling > only to the notification without affecting other parts of the mode line > that may be using 'mode-line-emphasis'. > > What do you think? Makes sense to me. I edited your NEWS message to be more clear, and installed this on master as commit 367c3f25a16. ------------=_1693860722-21252-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 20 Feb 2023 19:15:49 +0000 Received: from localhost ([127.0.0.1]:53675 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pUBdd-00034A-E4 for submit@debbugs.gnu.org; Mon, 20 Feb 2023 14:15:49 -0500 Received: from lists.gnu.org ([209.51.188.17]:41164) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pUBda-00033w-5p for submit@debbugs.gnu.org; Mon, 20 Feb 2023 14:15:47 -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 ) id 1pUBdA-00042l-HA for bug-gnu-emacs@gnu.org; Mon, 20 Feb 2023 14:15:32 -0500 Received: from relay8-d.mail.gandi.net ([217.70.183.201]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1pUBd8-0002wk-0v for bug-gnu-emacs@gnu.org; Mon, 20 Feb 2023 14:15:20 -0500 Received: (Authenticated sender: public@protesilaos.com) by mail.gandi.net (Postfix) with ESMTPSA id 9E95F1BF203 for ; Mon, 20 Feb 2023 19:15:13 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=protesilaos.com; s=gm1; t=1676920513; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:mime-version:mime-version:content-type:content-type; bh=dAYI/t2H7NmJ5ETQaOnE73gQ3xJ8hX2GmApdpHpDS+Y=; b=ElGKJX9Q8H3DKm36u6mdTPIqd6fL87lHn/C/vownI/hJiXhK+paSjhQ3D6vV27K/vWbkYB obM/taYlexL+977apQc3rb3QkpkOkNU9BvkgQmWJunm93TC5oGJuCU0htPwYtKHWahrvw5 UI3AEiHJK68Lpy4jYAIxV+O19PEt6LF5+XlDjiNbVnCprkngPFNby5khuW51t3uXj4bKev ZZiVr1Cp6T5rzPSo9oB7A4KK3Fp9IUr50ddUAPECM0cECeKy7kFlSifYlEVvVmxewcTSMt eZ1eBPc+P2d4KCpjDPPphK5Zpe2trvjQWkmRs6FZpli1pOOuiWbAaVxzyMyKJw== From: Protesilaos Stavrou To: bug-gnu-emacs@gnu.org Subject: 30.0.50; [PATCH] Define 'appt-notification' face Date: Mon, 20 Feb 2023 21:15:12 +0200 Message-ID: <874jrgdu7z.fsf@protesilaos.com> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Received-SPF: none client-ip=217.70.183.201; envelope-from=info@protesilaos.com; helo=relay8-d.mail.gandi.net X-Spam_score_int: -23 X-Spam_score: -2.4 X-Spam_bar: -- X-Spam_report: (-2.4 / 5.0 requ) BAYES_00=-1.9, DKIM_INVALID=0.1, DKIM_SIGNED=0.1, RCVD_IN_DNSWL_LOW=-0.7, SPF_HELO_NONE=0.001, SPF_NONE=0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) --=-=-= Content-Type: text/plain Dear maintainers, The appt.el library can show a notification for upcoming appointments on the mode line. The face it uses is hardcoded to 'mode-line-emphasis' which, by default, is a bold weight. With the attached patch, we have a new face that the user/theme can set to something easier to spot like bold+red. Decoupling this indicator from the generic 'mode-line-emphasis' allows us to add extra styling only to the notification without affecting other parts of the mode line that may be using 'mode-line-emphasis'. What do you think? All the best, Protesilaos (or simply "Prot") -- Protesilaos Stavrou https://protesilaos.com --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-Add-appt-notification-face.patch >From 02a8768e4e81b8a645b81cb4864387bf4422bcfe Mon Sep 17 00:00:00 2001 Message-Id: <02a8768e4e81b8a645b81cb4864387bf4422bcfe.1676919809.git.info@protesilaos.com> From: Protesilaos Stavrou Date: Mon, 20 Feb 2023 21:03:08 +0200 Subject: [PATCH] Add 'appt-notification' face * etc/NEWS: Announce the new face. * lisp/calendar/appt.el (appt-notification): Declare the new face. (appt-check): Implement the new face. --- etc/NEWS | 6 ++++++ lisp/calendar/appt.el | 8 +++++++- 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/etc/NEWS b/etc/NEWS index bcce416ebc1..04fe60be493 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -61,6 +61,12 @@ This allows the user to customize the prompt that is appended by This is used for displaying the time and date components of 'display-time-mode'. +--- +** New face 'appt-notification'. +This is used for the warning message when 'appt-display-mode-line' is +non-nil. + + * Editing Changes in Emacs 30.1 diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el index 49597739446..3c2d7fee24b 100644 --- a/lisp/calendar/appt.el +++ b/lisp/calendar/appt.el @@ -165,6 +165,12 @@ (defcustom appt-delete-window-function #'appt-delete-window :type 'function :group 'appt) +(defface appt-notification + '((t :inherit mode-line-emphasis)) + "Face for appointment notification on the modeline. +Shown when `appt-display-mode-line' is non-nil." + :group 'mode-line-faces + :version "30.1") ;;; Internal variables below this point. @@ -406,7 +412,7 @@ (defun appt-check (&optional force) (appt-mode-line (mapcar #'number-to-string min-list) t) - 'face 'mode-line-emphasis) + 'face 'appt-notification) " "))) ;; Reset count to 0 in case we display another appt on the next cycle. (setq appt-display-count (if (equal '(0) min-list) 0 -- 2.39.2 --=-=-=-- ------------=_1693860722-21252-1--