summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAmin Bandali <bandali@gnu.org>2018-10-20 14:51:45 -0400
committerAmin Bandali <bandali@gnu.org>2018-10-20 14:52:45 -0400
commit1278d522a2b6776b619da3ee462f0b55193e3eb4 (patch)
treeac64207f49fc67c41be6cd9aea03097a61f78292
parent27d877190de6bb1438d89c3bd4c5ec2237e18017 (diff)
downloadconfigs-1278d522a2b6776b619da3ee462f0b55193e3eb4.tar.gz
configs-1278d522a2b6776b619da3ee462f0b55193e3eb4.tar.xz
configs-1278d522a2b6776b619da3ee462f0b55193e3eb4.zip
[emacs] some cosmetic changes
Diffstat (limited to '')
-rw-r--r--etc/custom.el74
-rw-r--r--init.org20
2 files changed, 90 insertions, 4 deletions
diff --git a/etc/custom.el b/etc/custom.el
new file mode 100644
index 0000000..3868db1
--- /dev/null
+++ b/etc/custom.el
@@ -0,0 +1,74 @@
+(custom-set-variables
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(company-dabbrev-char-regexp "\\sw\\|\\s_\\|[-_]")
+ '(company-dabbrev-downcase nil)
+ '(company-dabbrev-ignore-case nil)
+ '(company-idle-delay 0.3)
+ '(company-minimum-prefix-length 1)
+ '(company-selection-wrap-around t)
+ '(ibuffer-formats
+ '((mark modified read-only locked " "
+ (name 18 18 :left :elide)
+ " "
+ (size-h 9 -1 :right)
+ " "
+ (mode 16 16 :left :elide)
+ " " filename-and-process)
+ (mark " "
+ (name 16 -1)
+ " " filename)))
+ '(ibuffer-saved-filter-groups
+ '(("default"
+ ("dired"
+ (mode . dired-mode))
+ ("org"
+ (name . "^.*org$"))
+ ("web"
+ (or
+ (mode . web-mode)
+ (mode . css-mode)
+ (mode . scss-mode)
+ (mode . js2-mode)))
+ ("shell"
+ (or
+ (mode . eshell-mode)
+ (mode . shell-mode)))
+ ("notmuch"
+ (name . "*notmuch*"))
+ ("programming"
+ (or
+ (mode . python-mode)
+ (mode . c++-mode)
+ (mode . emacs-lisp-mode)))
+ ("emacs"
+ (or
+ (name . "^\\*scratch\\*$")
+ (name . "^\\*Messages\\*$"))))))
+ '(org-latex-packages-alist '(("" "listings") ("" "color")))
+ '(safe-local-variable-values
+ '((eval setq org-latex-prefer-user-labels t)
+ (eval add-hook 'after-save-hook 'org-latex-export-to-latex t t)
+ (org-hugo-footer . "
+
+[//]: # \"Exported with love from a post written in Org mode\"
+[//]: # \"- https://ox-hugo.scripter.co\"")
+ (eval add-hook 'after-save-hook #'amin/async-babel-tangle 'append 'local))))
+(custom-set-faces
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.
+ '(dired-directory ((t (:weight semi-bold))))
+ '(font-lock-comment-face ((t (:foreground "#111111" :weight semi-bold))))
+ '(ivy-minibuffer-match-face-2 ((t (:background "#e99ce8" :weight semi-bold))))
+ '(ivy-minibuffer-match-face-3 ((t (:background "#bbbbff" :weight semi-bold))))
+ '(ivy-minibuffer-match-face-4 ((t (:background "#ffbbff" :weight semi-bold))))
+ '(magit-diff-file-heading ((t (:weight normal))))
+ '(message-header-subject ((t (:foreground "navy blue" :weight semi-bold))))
+ '(message-header-to ((t (:foreground "MidnightBlue" :weight semi-bold))))
+ '(notmuch-search-unread-face ((t (:weight semi-bold))))
+ '(notmuch-tag-face ((t (:foreground "navy blue" :weight semi-bold))))
+ '(widget-button ((t (:weight semi-bold)))))
diff --git a/init.org b/init.org
index 0dcec85..b82ba6f 100644
--- a/init.org
+++ b/init.org
@@ -795,7 +795,8 @@ Not just how I do git, but /the/ way to do git.
(magit-add-section-hook 'magit-status-sections-hook
'magit-insert-modules
'magit-insert-stashes
- 'append))
+ 'append)
+ :custom-face (magit-diff-file-heading ((t (:weight normal)))))
#+end_src
*** [[https://github.com/abo-abo/swiper][Ivy]] (and friends)
@@ -821,7 +822,11 @@ There's no way I could top that, so I won't attempt to.
("DEL" . ivy-backward-delete-char))
:config
(setq ivy-wrap t)
- (ivy-mode 1))
+ (ivy-mode 1)
+ :custom-face
+ (ivy-minibuffer-match-face-2 ((t (:background "#e99ce8" :weight semi-bold))))
+ (ivy-minibuffer-match-face-3 ((t (:background "#bbbbff" :weight semi-bold))))
+ (ivy-minibuffer-match-face-4 ((t (:background "#ffbbff" :weight semi-bold)))))
#+end_src
**** Swiper
@@ -1370,6 +1375,7 @@ Emacs package that displays available keybindings in popup
** [[https://github.com/maio/eink-emacs][eink-theme]]
#+begin_src emacs-lisp
+(setq doom-modeline-bar-width 5)
(load-theme 'eink t)
#+end_src
@@ -1541,7 +1547,9 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
#'flyspell-mode)
;; (add-hook 'message-setup-hook
;; #'mml-secure-message-sign-pgpmime)
- )
+ :custom-face
+ (message-header-subject ((t (:foreground "navy blue" :weight semi-bold))))
+ (message-header-to ((t (:foreground "MidnightBlue" :weight semi-bold)))))
(after! mml-sec
(setq mml-secure-openpgp-encrypt-to-self t
@@ -1604,6 +1612,7 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
;; (set! :evil-state 'notmuch-message-mode 'insert)
;; (advice-add #'notmuch-bury-or-kill-this-buffer
;; :override #'kill-this-buffer)
+ :hook (notmuch-message-mode . doom-modeline-set-special-modeline)
:bind
(:map notmuch-hello-mode-map
("u" . (lambda ()
@@ -1665,7 +1674,10 @@ See [[notmuch:id:87muuqsvci.fsf@fencepost.gnu.org][bug follow-up]].
"Mark message as spam"
(interactive)
(notmuch-tree-tag '("-unread" "-inbox" "-webmasters" "+spam"))
- (notmuch-tree-next-message)))))
+ (notmuch-tree-next-message))))
+ :custom-face
+ (notmuch-search-unread-face ((t (:weight semi-bold))))
+ (notmuch-tag-face ((t (:foreground "navy blue" :weight semi-bold)))))
(use-package counsel-notmuch
:bind ("C-c s m" . counsel-notmuch))