diff options
| -rw-r--r-- | completion.org | 4 | ||||
| -rw-r--r-- | lib/themes/jao-themes.el | 45 | ||||
| -rw-r--r-- | notmuch.org | 4 |
3 files changed, 27 insertions, 26 deletions
diff --git a/completion.org b/completion.org index da9a9b0..4567db9 100644 --- a/completion.org +++ b/completion.org @@ -248,7 +248,7 @@ #+begin_src emacs-lisp (use-package embark :ensure t - + :demand t :custom ((embark-quit-after-action nil) (embark-verbose-indicator-display-action '((display-buffer-at-bottom) @@ -269,7 +269,7 @@ (with-eval-after-load 'consult (with-eval-after-load 'embark (require 'embark-consult))) - (require 'embark) + #+end_src *** org targets #+begin_src emacs-lisp diff --git a/lib/themes/jao-themes.el b/lib/themes/jao-themes.el index 60af12a..5637325 100644 --- a/lib/themes/jao-themes.el +++ b/lib/themes/jao-themes.el @@ -335,28 +335,6 @@ (clojure-test-failure-face (p warning) ul) (clojure-test-error-face (p error) ul) (cursor (p error))) - `((diredp-compressed-file-suffix (~ diredp-file-suffix)) - (diredp-date-time (p f01)) - (diredp-deletion (p error)) - (diredp-deletion-file-name (~ diredp-deletion)) - (diredp-dir-heading bf dfg dbg) - (diredp-dir-name (p f10)) - (diredp-dir-priv dfg dbg bf) - (diredp-display-msg (p f00)) - (diredp-exec-priv dfg dbg bf) - (diredp-executable-tag (p error)) - (diredp-file-name dfg dbg) - (diredp-file-suffix (~ diredp-file-name)) - (diredp-flag-mark (p f00) bf) - (diredp-flag-mark-line (p hilite)) - (diredp-ignored-file-name (p dimm)) - (diredp-link-priv (~ diredp-symlink)) - (diredp-no-priv (~ diredp-read-priv)) - (diredp-other-priv dfg dbg) - (diredp-rare-priv dfg dfg) - (diredp-read-priv dfg dbg bf) - (diredp-symlink (p warning)) - (diredp-write-priv dfg dbg bf)) `((change-log-acknowledgement (p f02)) (change-log-conditionals (p f02)) (change-log-date (p f01)) @@ -392,6 +370,7 @@ (compilation-mode-line-exit (p f01) nbf) (compilation-mode-line-run (p warning)) (compilation-warning nbf (p warning) nul) + (completions-annotations (p f10) nit) (completions-common-part nbf :width normal) (completions-first-difference bf dfg dbg) (corfu-background (p hilite)) @@ -464,6 +443,28 @@ (dired-warn-writable (p warning)) (dired-warning (p warning)) (diredp-number (p f11))) + `((diredp-compressed-file-suffix (~ diredp-file-suffix)) + (diredp-date-time (p f01)) + (diredp-deletion (p error)) + (diredp-deletion-file-name (~ diredp-deletion)) + (diredp-dir-heading bf dfg dbg) + (diredp-dir-name (p f10)) + (diredp-dir-priv dfg dbg bf) + (diredp-display-msg (p f00)) + (diredp-exec-priv dfg dbg bf) + (diredp-executable-tag (p error)) + (diredp-file-name dfg dbg) + (diredp-file-suffix (~ diredp-file-name)) + (diredp-flag-mark (p f00) bf) + (diredp-flag-mark-line (p hilite)) + (diredp-ignored-file-name (p dimm)) + (diredp-link-priv (~ diredp-symlink)) + (diredp-no-priv (~ diredp-read-priv)) + (diredp-other-priv dfg dbg) + (diredp-rare-priv dfg dfg) + (diredp-read-priv dfg dbg bf) + (diredp-symlink (p warning)) + (diredp-write-priv dfg dbg bf)) `((ediff-current-diff-A (~ diff-added) ex) (ediff-current-diff-Ancestor (c nil ,jao-themes--box)) (ediff-current-diff-B (~ ediff-current-diff-A) ex) diff --git a/notmuch.org b/notmuch.org index 9a7772f..20ddebc 100644 --- a/notmuch.org +++ b/notmuch.org @@ -187,8 +187,8 @@ (insert (match-string 1 address)) (let ((shr-width 1000)) (shr-render-region (point-min) (point-max))) - (buffer-string)) - (string-replace "ElDiario.es - ElDiario.es" "D.es" address)))) + (replace-regexp-in-string "\"" "" (buffer-string))) + (string-replace "ElDiario.es - ElDiario.es" "D" address)))) (funcall fun address))) (advice-add 'notmuch-clean-address :around #'jao-mail-clean-address) |