From 49b1f5acdd11c2e8e674c3ace69fec1fad7867e7 Mon Sep 17 00:00:00 2001 From: jao Date: Thu, 4 Feb 2021 18:33:37 +0000 Subject: small adjustments --- consult.org | 2 +- exwm.org | 4 +++- gnus.org | 2 +- init.org | 13 +++++++------ lib/themes/jao-light-theme.el | 4 ++-- 5 files changed, 14 insertions(+), 11 deletions(-) diff --git a/consult.org b/consult.org index 1ea9f3c..f8fbdf5 100644 --- a/consult.org +++ b/consult.org @@ -158,7 +158,7 @@ (setq jao-embark--excluded '(embark-collect-snapshot embark-collect-live embark-export - embark-become embark-isearch)) + embark-become embark-isearch nil)) (defun jao-embark--bind-desc (descs x) (let ((k (car x)) (c (cdr x))) diff --git a/exwm.org b/exwm.org index 5cc5095..e26fe65 100644 --- a/exwm.org +++ b/exwm.org @@ -481,7 +481,6 @@ ([?\s-a] . jao-first-window) ([?\s-b] . jao-hydra-org-blog/body) ([?\s-c] . jao-hydra-chats/body) - ([?\s-r] . counsel-linux-app) ([?\s-t] . jao-vterm-here-toggle) ([?\s-n] . jao-hydra-ednc/body) ([?\s-O] . ace-swap-window) @@ -501,6 +500,9 @@ ([s-tab] . jao-exwm-switch-to-next-class) ([print] . jao-exwm-import-screen))) + (when (eq 'counsel jao-completion-engine) + (add-to-list 'exwm-input-global-keys '([?\s-r] . counsel-linux-app))) + ;; (customize-set-variable 'exwm-input-global-keys exwm-input-global-keys) #+END_SRC diff --git a/gnus.org b/gnus.org index 6d87741..40eb451 100644 --- a/gnus.org +++ b/gnus.org @@ -454,7 +454,7 @@ (use-package org-capture :config (add-to-list 'org-capture-templates - '("X" "arXiv" entry (file+olp "misc.org" "Physics" "arXiv") + '("X" "arXiv" entry (file "notes/physics/arxiv.org") "* %:subject\n %i" :immediate-finish t) t) (org-capture-upgrade-templates org-capture-templates)) diff --git a/init.org b/init.org index 64e0cf1..1ccf0cc 100644 --- a/init.org +++ b/init.org @@ -233,8 +233,9 @@ (shell-command-to-string "setxkbmap -query|grep variant")))) (set-keyboard-coding-system 'latin-1) - (setq default-input-method "catalan-prefix") (set-language-environment "UTF-8") + ;; must be set after current-language-environment + (customize-set-variable 'default-input-method "catalan-prefix") (defun jao--set-kb-system (frame) (select-frame frame) @@ -1344,10 +1345,10 @@ #+end_src *** Frame layout, title, etc. #+BEGIN_SRC emacs-lisp - (defvar jao-frames-fringe-mode 0) (setq frame-title-format '("%b")) (use-package fringe) - (fringe-mode jao-frames-fringe-mode) + (fringe-mode) + (menu-bar-mode (jao-d-l 1 -1)) ;; (setting it to nil avoids mouse wrapping after other-frame) @@ -4034,10 +4035,10 @@ #+begin_src emacs-lisp (jao-maybe-tangle "lib/media/espotify") - (use-package espotify) + (use-package espotify :demand t) (when (eq 'consult jao-completion-engine) - (use-package espotify-consult :demand t) + (require 'espotify-consult) (use-package espotify-embark :demand t) (defalias 'jao-spotify-album #'espotify-consult-album) (defalias 'jao-spotify-track #'espotify-consult-track) @@ -4045,7 +4046,7 @@ (defalias 'jao-spotify-playlist #'espotify-consult-playlist)) (when (eq 'counsel jao-completion-engine) - (use-package espotify-counsel :demand t) + (require 'espotify-counsel) (defalias 'jao-spotify-album #'espotify-counsel-album) (defalias 'jao-spotify-track #'espotify-counsel-track) (defalias 'jao-spotify-artist #'espotify-counsel-artist) diff --git a/lib/themes/jao-light-theme.el b/lib/themes/jao-light-theme.el index 369fb38..e339aa0 100644 --- a/lib/themes/jao-light-theme.el +++ b/lib/themes/jao-light-theme.el @@ -98,7 +98,7 @@ (fringe (c "grey70" nil)) (gnus-button (p link) nul) (gnus-cite-1 (c "darkslategray")) - (gnus-cite-2 (c "darkslategray")) + (gnus-cite-2 (c "slate gray")) (gnus-cite-3 (c "slate gray")) (gnus-cite-4 (c "slate gray")) (gnus-summary-selected (c green) nbf) @@ -123,7 +123,7 @@ (vertical-border (c "grey70" nil)) (warning (c "burlywood4")) (w3m-image (c slate "ghost white")) - (w3m-bold (c slate) nbf :height 1.1))) + (w3m-bold (c slate) nbf :height 100))) ;; (enable-theme 'jao-light) -- cgit v1.2.3