diff options
| -rw-r--r-- | .config/emacs/modules/bd--eww.el | 15 | ||||
| -rw-r--r-- | .config/emacs/modules/bd--org.el | 4 | ||||
| -rw-r--r-- | .config/emacs/modules/bd--themes.el | 22 |
3 files changed, 38 insertions, 3 deletions
diff --git a/.config/emacs/modules/bd--eww.el b/.config/emacs/modules/bd--eww.el index 7bde428..31ff15b 100644 --- a/.config/emacs/modules/bd--eww.el +++ b/.config/emacs/modules/bd--eww.el @@ -1,9 +1,22 @@ ;; -*- lexical-binding: t; -*- +;;;; chromium +;; less chromium the better +(defun chromium (url) + "Given a user url or search term, opens chromium +in application mode. Application mode removes foreign +tabs and search bars, better integrating with emacs." + (interactive "sEnter url or keywords: ") + (setq url (eww--dwim-expand-url url)) + (start-process-shell-command "chromium" nil (concat "chromium --incognito --app=\"" url "\""))) + + +;;(defun bd/eww-open-chromium +;;;; eww ;; do not use an external browser (setopt browse-url-browser-function 'eww-browse-url - shr-use-fonts nil + shr-use-fonts t shr-cookie-policy nil shr-max-width 85 ;; send only user agent diff --git a/.config/emacs/modules/bd--org.el b/.config/emacs/modules/bd--org.el index 5b613dc..99bb839 100644 --- a/.config/emacs/modules/bd--org.el +++ b/.config/emacs/modules/bd--org.el @@ -59,9 +59,9 @@ each org file open." "* TODO %?\n DEADLINE: %^t") ("cm" "Machine Learning" entry (file+olp ,agenda-file "CS445") "* TODO %?\n DEADLINE: %^t") - ("cp" "Programming Languages" entry (file+olp ,agenda-file "CS454") + ("cc" "Compiler Construction" entry (file+olp ,agenda-file "CS453") "* TODO %?\n DEADLINE: %^t") - ("cc" "Creative Writing" entry (file+olp ,agenda-file "E210") + ("cw" "Creative Writing" entry (file+olp ,agenda-file "E210") "* TODO %?\n DEADLINE: %^t") ("s" " Self") ("si" "Idea" entry (file+olp ,agenda-file "Idea / Return") diff --git a/.config/emacs/modules/bd--themes.el b/.config/emacs/modules/bd--themes.el index 1372ea4..3433e3f 100644 --- a/.config/emacs/modules/bd--themes.el +++ b/.config/emacs/modules/bd--themes.el @@ -1,6 +1,27 @@ ;; -*- lexical-binding: t; -*- +;;;; variable-pitch fonts +(defun bd/enable-variable-pitch-exempt () + "Text modes to exempt from variable pitch fonts." + (unless (derived-mode-p 'latex-mode 'mhtml-mode 'nxml-mode 'yaml-mode) + (variable-pitch-mode 1))) + +(defvar bd/enable-variable-pitch-in-hooks + '(text-mode-hook) + "List of hook symbols to add `variable-pitch-mode' +to.") + +(mapc + (lambda (hook) + (add-hook hook #'bd/enable-variable-pitch-exempt)) + bd/enable-variable-pitch-in-hooks) + +(set-face-attribute 'variable-pitch nil + :family "Dejavu Serif") + + +;;;; colors (defun modus-themes-custom-faces () (modus-themes-with-colors (custom-set-faces @@ -23,6 +44,7 @@ (setopt modus-themes-italic-constructs t modus-themes-bold-constructs t + modux-themes-mixed-fonts t modus-themes-hl-line '(accented) modus-themes-subtle-line-numbers t modus-themes-paren-match '(intense) |