From: Rich Pieri <rich.pieri@PrescientTech.com>
Subject: No More Colors
Date: 29 Jan 1997 12:44:32 -0500 [thread overview]
Message-ID: <x7lo9cz88v.fsf@gkar.asds.com> (raw)
Credit for this patch goes to Kevin Christian
<Kevin.Christian@symbios.com>. I only cleaned it up a bit. Thanks,
Kevin. (No PGP signature this time; it messes up the leading dashes).
*** custom.el.orig Sun Jan 26 06:08:25 1997
--- custom.el Wed Jan 29 12:40:48 1997
***************
*** 352,357 ****
--- 352,361 ----
(apply 'custom-face-attribites-set face frame atts)
(setq spec nil))))))
+ (defcustom custom-no-colors nil
+ "Do not use colors.
+ If t, do not use any colors.")
+
(defcustom custom-background-mode nil
"The brightness of the background.
Set this to the symbol dark if your background color is dark, light if
***************
*** 382,390 ****
window-system)))
(setq match (memq type options))))
((eq req 'class)
! (let ((class (if (fboundp 'device-class)
(device-class (frame-device frame))
! (frame-property frame 'display-type))))
(setq match (memq class options))))
((eq req 'background)
(let ((background (or custom-background-mode
--- 386,395 ----
window-system)))
(setq match (memq type options))))
((eq req 'class)
! (let ((class (if (eq custom-no-colors t) `mono
! (if (fboundp 'device-class)
(device-class (frame-device frame))
! (frame-property frame 'display-type)))))
(setq match (memq class options))))
((eq req 'background)
(let ((background (or custom-background-mode
reply other threads:[~1997-01-29 17:44 UTC|newest]
Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=x7lo9cz88v.fsf@gkar.asds.com \
--to=rich.pieri@prescienttech.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).