GNU bug report logs - #61432
28.2; [PATCH] viper-init: disable face support

Previous Next

Package: emacs;

Reported by: Andrés Ramírez <rrandresf <at> hotmail.com>

Date: Sat, 11 Feb 2023 14:28:02 UTC

Severity: normal

Tags: patch

Found in version 28.2

Done: Eli Zaretskii <eliz <at> gnu.org>

Bug is archived. No further changes may be made.

Full log


View this message in rfc822 format

From: help-debbugs <at> gnu.org (GNU bug Tracking System)
To: Eli Zaretskii <eliz <at> gnu.org>
Cc: tracker <at> debbugs.gnu.org
Subject: bug#61432: closed (28.2; [PATCH] viper-init: disable face support)
Date: Sat, 18 Feb 2023 17:02:02 +0000
[Message part 1 (text/plain, inline)]
Your message dated Sat, 18 Feb 2023 19:01:05 +0200
with message-id <834jrizz5a.fsf <at> gnu.org>
and subject line Re: bug#61432: 28.2; [PATCH] viper-init: disable face support
has caused the debbugs.gnu.org bug report #61432,
regarding 28.2; [PATCH] viper-init: disable face support
to be marked as done.

(If you believe you have received this mail in error, please contact
help-debbugs <at> gnu.org.)


-- 
61432: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=61432
GNU Bug Tracking System
Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
From: Andrés Ramírez <rrandresf <at> hotmail.com>
To: bug-gnu-emacs <at> gnu.org
Subject: 28.2; [PATCH] viper-init: disable face support
Date: Sat, 11 Feb 2023 14:22:44 +0000
[Message part 3 (text/plain, inline)]
Hi.

The following patch disables face support for not changing the modeline
fonts when using viper.

[patch-viper-init-optionally-disable-face-support.patch (text/x-patch, inline)]
diff -u /tmp/viper-init.el.bak /tmp/viper-init.el
--- /tmp/viper-init.el.bak	2023-02-10 12:25:52.388368619 +0000
+++ /tmp/viper-init.el	2023-02-10 12:30:11.118394615 +0000
@@ -78,11 +78,16 @@
   :type 'boolean
   :group 'viper-highlighting)
 
+(defvar viper-disable-face-support nil
+  "disable the face support for not changing faces in the modeline. And stay as emacs -Q.")
+
 (defun viper-has-face-support-p ()
+  (if (and (boundp 'viper-disable-face-support) viper-disable-face-support)
+      nil
   (cond ((viper-window-display-p))
 	(viper-force-faces)
 	((viper-color-display-p))
-	(t (memq window-system '(pc)))))
+	(t (memq window-system '(pc))))))
 
 
 ;;; Macros

Diff finished.  Fri Feb 10 12:31:17 2023
[Message part 5 (text/plain, inline)]
Best Regards
[Message part 6 (message/rfc822, inline)]
From: Eli Zaretskii <eliz <at> gnu.org>
To: andrés ramírez <rrandresf <at> hotmail.com>
Cc: rpluim <at> gmail.com, 61432-done <at> debbugs.gnu.org
Subject: Re: bug#61432: 28.2; [PATCH] viper-init: disable face support
Date: Sat, 18 Feb 2023 19:01:05 +0200


This bug report was last modified 2 years and 171 days ago.

Previous Next


GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.