[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/oblivion-theme fc26fe16d8: Cleanup: set fill-column to 120
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/oblivion-theme fc26fe16d8: Cleanup: set fill-column to 120 (avoids wrapping) |
Date: |
Tue, 10 Jan 2023 04:59:36 -0500 (EST) |
branch: elpa/oblivion-theme
commit fc26fe16d86006f1c524d180b955286f48941b4e
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>
Cleanup: set fill-column to 120 (avoids wrapping)
---
oblivion-theme.el | 184 ++++++++++++++----------------------------------------
1 file changed, 47 insertions(+), 137 deletions(-)
diff --git a/oblivion-theme.el b/oblivion-theme.el
index 7de5762003..928162a320 100644
--- a/oblivion-theme.el
+++ b/oblivion-theme.el
@@ -62,6 +62,7 @@
(ob-aluminium6+5 "#3a4144"))
(custom-theme-set-faces
+ ;; Theme name.
'oblivion
;; Basic coloring.
@@ -72,9 +73,7 @@
`(fringe ((t (:background ,ob-aluminium5 :foreground ,ob-aluminium2))))
`(highlight ((t (:background ,ob-aluminium5))))
`(region ((t (:foreground ,ob-aluminium1 :background ,ob-aluminium4))))
- `(secondary-selection
- ((t
- (:foreground ,ob-chocolate2 :inverse-video t))))
+ `(secondary-selection ((t (:foreground ,ob-chocolate2 :inverse-video t))))
;; Success output.
`(success ((t (:foreground ,ob-chameleon1))))
`(warning ((t (:foreground ,ob-aluminium1 :background ,ob-plum1))))
@@ -86,17 +85,13 @@
`(link-visited ((t (:foreground ,ob-plum2)))) ; Not a GEdit color, just a
little darker.
`(widget-field ((t (:foreground ,ob-plum2 :background ,ob-butter1)))) ;
FIXME
;; Follow other window border colors (mode-line in this case), don't blend
in with the fringe.
- `(scroll-bar
- ((t
- (:foreground ,ob-aluminium4 :background ,ob-aluminium6))))
+ `(scroll-bar ((t (:foreground ,ob-aluminium4 :background ,ob-aluminium6))))
;; Default (font-lock)
`(font-lock-builtin-face ((t (:foreground ,ob-skyblue1))))
`(font-lock-comment-face ((t (:foreground ,ob-aluminium4))))
- `(font-lock-comment-delimiter-face
- ((t
- (:inherit font-lock-comment-face))))
+ `(font-lock-comment-delimiter-face ((t (:inherit font-lock-comment-face))))
`(font-lock-doc-face ((t (:foreground ,ob-skyblue1-2-blend)))) ; Alternate
comment face.
;; This doesn't have an equivalent for GEdit.
`(font-lock-doc-markup-face ((t (:foreground ,ob-plum1))))
@@ -107,34 +102,18 @@
`(font-lock-string-face ((t (:foreground ,ob-butter2))))
`(font-lock-type-face ((t (:foreground ,ob-chameleon1))))
`(font-lock-variable-name-face ((t (:foreground ,ob-orange1))))
- `(font-lock-warning-face
- ((t
- (:foreground ,ob-aluminium1 :background ,ob-plum1))))
+ `(font-lock-warning-face ((t (:foreground ,ob-aluminium1 :background
,ob-plum1))))
`(font-lock-negation-char-face ((t (:foreground ,ob-aluminium2)))) ;
currently no change.
- `(font-lock-regexp-grouping-construct
- ((t
- (:foreground ,ob-orange1 :weight bold))))
- `(font-lock-regexp-grouping-backslash
- ((t
- (:foreground ,ob-orange2 :weight bold))))
+ `(font-lock-regexp-grouping-construct ((t (:foreground ,ob-orange1 :weight
bold))))
+ `(font-lock-regexp-grouping-backslash ((t (:foreground ,ob-orange2 :weight
bold))))
;; Mode line.
- `(header-line
- ((t
- (:foreground ,ob-aluminium6 :background ,ob-aluminium3))))
- `(header-line-inactive
- ((t
- (:foreground ,ob-aluminium6 :background ,ob-aluminium4))))
- `(mode-line
- ((t
- (:foreground ,ob-aluminium6 :background ,ob-aluminium4))))
- `(mode-line-active
- ((t
- (:foreground ,ob-aluminium6 :background ,ob-aluminium3))))
- `(mode-line-inactive
- ((t
- (:foreground ,ob-aluminium6 :background ,ob-aluminium4))))
+ `(header-line ((t (:foreground ,ob-aluminium6 :background ,ob-aluminium3))))
+ `(header-line-inactive ((t (:foreground ,ob-aluminium6 :background
,ob-aluminium4))))
+ `(mode-line ((t (:foreground ,ob-aluminium6 :background ,ob-aluminium4))))
+ `(mode-line-active ((t (:foreground ,ob-aluminium6 :background
,ob-aluminium3))))
+ `(mode-line-inactive ((t (:foreground ,ob-aluminium6 :background
,ob-aluminium4))))
`(mode-line-buffer-id ((t (:foreground ,ob-aluminium6+5))))
`(hl-line ((t (:background ,ob-aluminium5))))
@@ -145,53 +124,34 @@
`(show-paren-match ((t (:foreground ,ob-chocolate2 :bold t))))
`(show-paren-match-expression ((t (:foreground ,ob-chocolate2))))
;; No equivalent from GEdit.
- `(show-paren-mismatch
- ((t
- (:foreground ,ob-scarletred2 :background
,ob-aluminium6-scarletred3-blend))))
+ `(show-paren-mismatch ((t (:foreground ,ob-scarletred2 :background
,ob-aluminium6-scarletred3-blend))))
;; Note: original theme doesn't show different colors here,
;; simply use bold for 'isearch'.
- `(isearch
- ((t
- (:foreground ,ob-aluminium1 :background ,ob-aluminium4 :bold t))))
+ `(isearch ((t (:foreground ,ob-aluminium1 :background ,ob-aluminium4 :bold
t))))
`(isearch-fail ((t (:foreground ,ob-white :background ,ob-scarletred1))))
- `(lazy-highlight
- ((t
- (:foreground ,ob-aluminium1 :background ,ob-chameleon3))))
+ `(lazy-highlight ((t (:foreground ,ob-aluminium1 :background
,ob-chameleon3))))
`(minibuffer-prompt ((t (:foreground ,ob-aluminium2 :bold t))))
`(line-number ((t (:foreground ,ob-aluminium5 :background ,ob-black))))
;; GEdit is same color but bold, this is _NOT_ bright enough.
- `(line-number-current-line
- ((t
- (:background ,ob-black :foreground ,ob-butter2 :bold t))))
+ `(line-number-current-line ((t (:background ,ob-black :foreground
,ob-butter2 :bold t))))
;; white-space.
`(whitespace-trailing ((nil (:background ,ob-aluminium4))))
`(whitespace-space ((nil (:foreground ,ob-aluminium4))))
- `(whitespace-tab
- ((nil
- (:background ,ob-aluminium6+5 :foreground ,ob-aluminium4))))
+ `(whitespace-tab ((nil (:background ,ob-aluminium6+5 :foreground
,ob-aluminium4))))
;; xref mode.
- `(xref-line-number
- ((t
- (:background ,ob-aluminium6+16 :foreground ,ob-aluminium4))))
+ `(xref-line-number ((t (:background ,ob-aluminium6+16 :foreground
,ob-aluminium4))))
;; tab-bar-mode.
- `(tab-bar
- ((t
- (:bold t :foreground ,ob-aluminium3 :background ,ob-aluminium6+5))))
+ `(tab-bar ((t (:bold t :foreground ,ob-aluminium3 :background
,ob-aluminium6+5))))
`(tab-bar-tab
((t
- (:foreground
- ,ob-aluminium3
- :background ,ob-aluminium6+16
- :box (:line-width -1 :color ,ob-aluminium4)))))
- `(tab-bar-tab-inactive
- ((t
- (:bold nil :italic t :foreground ,ob-aluminium3 :background
,ob-aluminium6+16))))
+ (:foreground ,ob-aluminium3 :background ,ob-aluminium6+16 :box
(:line-width -1 :color ,ob-aluminium4)))))
+ `(tab-bar-tab-inactive ((t (:bold nil :italic t :foreground ,ob-aluminium3
:background ,ob-aluminium6+16))))
;; which-func (shows in the mode-line).
`(which-func ((t (:bold t :foreground ,ob-aluminium3))))
@@ -208,58 +168,32 @@
`(diff-removed ((t (:background ,ob-aluminium6-as-red))))
;; Refine colors for emacs 27+.
`(diff-refine-added ((t (:background ,ob-aluminium6-chameleon3-blend))))
- `(diff-refine-removed
- ((t
- (:background ,ob-aluminium6-scarletred3-blend))))
+ `(diff-refine-removed ((t (:background ,ob-aluminium6-scarletred3-blend))))
;; Headers:
;; These are displayed grouped.
- `(diff-header
- ((t
- (:foreground ,ob-aluminium1 :background ,ob-aluminium6+16))))
+ `(diff-header ((t (:foreground ,ob-aluminium1 :background
,ob-aluminium6+16))))
;; Use the same colors, too many tones here makes diff headers overly busy.
- `(diff-index
- ((t
- (:foreground ,ob-aluminium1 :background ,ob-aluminium6+16))))
- `(diff-file-header
- ((t
- (:foreground ,ob-aluminium1 :background ,ob-aluminium6+16))))
+ `(diff-index ((t (:foreground ,ob-aluminium1 :background
,ob-aluminium6+16))))
+ `(diff-file-header ((t (:foreground ,ob-aluminium1 :background
,ob-aluminium6+16))))
;; These are displayed side-by-side, a rare exception where a black
;; background is useful to visually separate content.
- `(diff-hunk-header
- ((t
- (:foreground ,ob-skyblue1 :background ,ob-black))))
+ `(diff-hunk-header ((t (:foreground ,ob-skyblue1 :background ,ob-black))))
`(diff-function ((t (:foreground ,ob-butter1 :background ,ob-black))))
;; ediff-mode
- `(ediff-current-diff-A
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-scarletred2))))
- `(ediff-current-diff-Ancestor
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-scarletred2))))
- `(ediff-current-diff-B
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-chameleon2))))
- `(ediff-current-diff-C
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-skyblue1))))
+ `(ediff-current-diff-A ((t (:foreground ,ob-aluminium2 :background
,ob-scarletred2))))
+ `(ediff-current-diff-Ancestor ((t (:foreground ,ob-aluminium2 :background
,ob-scarletred2))))
+ `(ediff-current-diff-B ((t (:foreground ,ob-aluminium2 :background
,ob-chameleon2))))
+ `(ediff-current-diff-C ((t (:foreground ,ob-aluminium2 :background
,ob-skyblue1))))
`(ediff-even-diff-A ((t (:background ,ob-aluminium6+5))))
`(ediff-even-diff-Ancestor ((t (:background ,ob-aluminium6+5))))
`(ediff-even-diff-B ((t (:background ,ob-aluminium6+5))))
`(ediff-even-diff-C ((t (:background ,ob-aluminium6+5))))
- `(ediff-fine-diff-A
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-scarletred1 :weight bold))))
- `(ediff-fine-diff-Ancestor
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-scarletred1 weight bold))))
- `(ediff-fine-diff-B
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-chameleon1 :weight bold))))
- `(ediff-fine-diff-C
- ((t
- (:foreground ,ob-aluminium2 :background ,ob-skyblue1 :weight bold))))
+ `(ediff-fine-diff-A ((t (:foreground ,ob-aluminium2 :background
,ob-scarletred1 :weight bold))))
+ `(ediff-fine-diff-Ancestor ((t (:foreground ,ob-aluminium2 :background
,ob-scarletred1 weight bold))))
+ `(ediff-fine-diff-B ((t (:foreground ,ob-aluminium2 :background
,ob-chameleon1 :weight bold))))
+ `(ediff-fine-diff-C ((t (:foreground ,ob-aluminium2 :background
,ob-skyblue1 :weight bold))))
`(ediff-odd-diff-A ((t (:background ,ob-aluminium6+16))))
`(ediff-odd-diff-Ancestor ((t (:background ,ob-aluminium6+16))))
`(ediff-odd-diff-B ((t (:background ,ob-aluminium6+16))))
@@ -275,9 +209,7 @@
`(dired-directory ((t (:foreground ,ob-chameleon1))))
`(dired-header ((t (:foreground ,ob-chocolate2))))
`(dired-symlink ((t (:bold t :foreground ,ob-butter1))))
- `(dired-broken-symlink
- ((t
- (:bold t :foreground ,ob-butter1 :background ,ob-scarletred2))))
+ `(dired-broken-symlink ((t (:bold t :foreground ,ob-butter1 :background
,ob-scarletred2))))
;; Haskell.
`(haskell-operator-face ((t (:foreground ,ob-white))))
@@ -293,12 +225,8 @@
`(org-footnote ((t (:foreground ,ob-orange2 :underline t))))
`(org-link ((t (:foreground ,ob-aluminium3 :underline t))))
`(org-special-keyword ((t (:foreground ,ob-orange2))))
- `(org-verbatim
- ((t
- (:foreground ,ob-chocolate1 :background ,ob-aluminium6+16))))
- `(org-code
- ((t
- (:inherit font-lock-string-face :background ,ob-aluminium6+16))))
+ `(org-verbatim ((t (:foreground ,ob-chocolate1 :background
,ob-aluminium6+16))))
+ `(org-code ((t (:inherit font-lock-string-face :background
,ob-aluminium6+16))))
`(org-block ((t (:foreground ,ob-aluminium3))))
`(org-quote ((t (:inherit org-block :slant italic))))
`(org-verse ((t (:inherit org-block :slant italic))))
@@ -307,9 +235,7 @@
`(org-warning ((t (:foreground ,ob-chameleon1 :underline t))))
`(org-agenda-structure ((t (:foreground ,ob-scarletred1 :weight bold))))
`(org-agenda-date ((t (:foreground ,ob-chameleon1))))
- `(org-agenda-date-weekend
- ((t
- (:foreground ,ob-skyblue1 :weight normal))))
+ `(org-agenda-date-weekend ((t (:foreground ,ob-skyblue1 :weight normal))))
`(org-agenda-date-today ((t (:foreground ,ob-butter2 :weight bold))))
;; reStructuredText.
@@ -319,9 +245,7 @@
'(rst-emphasis1 ((t (:italic t))))
'(rst-emphasis2 ((t (:weight bold t))))
`(rst-reference ((t (:foreground ,ob-plum1))))
- `(rst-literal
- ((t
- (:inherit font-lock-string-face :background ,ob-aluminium6+16))))
+ `(rst-literal ((t (:inherit font-lock-string-face :background
,ob-aluminium6+16))))
;; titles baseline.
`(rst-adornment ((t (:foreground ,ob-butter3))))
@@ -333,9 +257,7 @@
`(rst-level-6 ((t (:foreground ,ob-butter3))))
;; `markdown-mode`.
- `(markdown-inline-code-face
- ((t
- (:inherit font-lock-string-face :background ,ob-aluminium6+16))))
+ `(markdown-inline-code-face ((t (:inherit font-lock-string-face :background
,ob-aluminium6+16))))
`(markdown-header-face-1 ((t (:foreground ,ob-butter3))))
`(markdown-header-face-2 ((t (:foreground ,ob-butter3))))
`(markdown-header-face-3 ((t (:foreground ,ob-butter3))))
@@ -377,21 +299,13 @@
`(ivy-current-match ((t (:inherit region))))
`(ivy-grep-info ((t (:foreground ,ob-plum1))))
;; highlight matching chars (same as isearch).
- `(ivy-minibuffer-match-face-2
- ((t
- (:background ,ob-chocolate3 :foreground ,ob-aluminium6+16))))
+ `(ivy-minibuffer-match-face-2 ((t (:background ,ob-chocolate3 :foreground
,ob-aluminium6+16))))
;; company (melpa).
- `(company-tooltip
- ((t
- (:background ,ob-aluminium4 :foreground ,ob-white))))
- `(company-tooltip-selection
- ((t
- (:background ,ob-aluminium6+5 :weight bold))))
+ `(company-tooltip ((t (:background ,ob-aluminium4 :foreground ,ob-white))))
+ `(company-tooltip-selection ((t (:background ,ob-aluminium6+5 :weight
bold))))
`(company-tooltip-annotation ((t (:foreground ,ob-aluminium2))))
- `(company-tooltip-common
- ((t
- (:foreground ,ob-aluminium6+16 :background ,ob-chocolate3))))
+ `(company-tooltip-common ((t (:foreground ,ob-aluminium6+16 :background
,ob-chocolate3))))
`(company-scrollbar-bg ((t (:background ,ob-aluminium4))))
;; Not based on original theme, could change.
@@ -402,9 +316,7 @@
;; fancy-dabbrev (melpa).
;; Colors selected from the palette to be a balance: not too intrusive, not
too faded.
- `(fancy-dabbrev-preview-face
- ((t
- (:foreground ,ob-aluminium4 :background ,ob-aluminium6+5))))
+ `(fancy-dabbrev-preview-face ((t (:foreground ,ob-aluminium4 :background
,ob-aluminium6+5))))
;; neotree (melpa).
`(neo-banner-face ((t (:foreground ,ob-chocolate2))))
@@ -441,13 +353,11 @@
;;;###autoload
(when load-file-name
- (add-to-list
- 'custom-theme-load-path
- (file-name-as-directory (file-name-directory load-file-name))))
+ (add-to-list 'custom-theme-load-path (file-name-as-directory
(file-name-directory load-file-name))))
(provide-theme 'oblivion)
;; Local Variables:
-;; fill-column: 99
+;; fill-column: 120
;; indent-tabs-mode: nil
;; End:
;;; oblivion-theme.el ends here
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/oblivion-theme fc26fe16d8: Cleanup: set fill-column to 120 (avoids wrapping),
ELPA Syncer <=