diff --git a/README.org b/README.org index 3b9043b..1731ebc 100644 --- a/README.org +++ b/README.org @@ -1249,7 +1249,8 @@ file. #+name: lst:enable-vertico-mode #+begin_src emacs-lisp (when (fboundp 'savehist-mode) - (savehist-mode +1) + (savehist-mode +1)) +(with-eval-after-load 'savehist-mode (custom-set-variables '(savehist-additional-variables '(eww-history @@ -4226,9 +4227,9 @@ and listing [[lst:setting-python-shell-virtualenv-root]] to set ("ipython" (custom-set-variables `(python-shell-interpreter - ,(or (executable-find "ipython3") (executable-find "ipython"))) - '(python-shell-interpreter-args - "--simple-prompt --HistoryAccessor.enabled=False")))) + ,(or (executable-find "ipython3") (executable-find "ipython")))) + (setq python-shell-interpreter-args + "--simple-prompt --HistoryAccessor.enabled=False"))) (message "Now `python-shell-interpreter' equals %S" python-shell-interpreter)))) #+end_src @@ -4990,19 +4991,12 @@ Listing [[lst:configure-browse-url]] configures =browse-url=. (seq (+? nonl) (or ".mp4" ".webm") eos))) "Match hyperlinks to browse with mpv.") - (if (version< emacs-version "28.0") - (custom-set-variables - '(browse-url-browser-function - `((,browse-url-mpv-regexp . browse-url-mpv) - ("." . eww-browse-url)))) - (custom-set-variables - '(browse-url-handlers - `((,browse-url-mpv-regexp . browse-url-mpv) - ("." . eww-browse-url))))) - (custom-set-variables `(browse-url-generic-program ,(or (when (eq system-type 'darwin) "open") - (executable-find "firefox"))))) + (executable-find "firefox"))) + '(browse-url-handlers + `((,browse-url-mpv-regexp . browse-url-mpv) + ("." . eww-browse-url))))) #+end_src *** [[https://en.wikipedia.org/wiki/Eww_(web_browser)][Emacs Web Wowser]] @@ -5148,19 +5142,21 @@ initializes a list of =webjump-sites=. #+begin_src emacs-lisp (with-eval-after-load 'gnus (custom-set-variables - '(gnus-select-method '(nntp "news.gmane.io")) - (with-eval-after-load 'gnus-start - (custom-set-variables - '(gnus-check-bogus-newsgroups nil) - '(gnus-check-new-newsgroups 'ask-server) - '(gnus-read-newsrc-file t) - '(gnus-read-active-file 'some) - '(gnus-save-killed-list t) - '(gnus-save-newsrc-file t) - '(gnus-use-dribble-file t))) - (with-eval-after-load 'gnus-sum - (custom-set-variables - '(gnus-thread-hide-subtree t))))) + '(gnus-select-method '(nntp "news.gmane.io")))) + +(with-eval-after-load 'gnus-start + (custom-set-variables + '(gnus-check-bogus-newsgroups nil) + '(gnus-check-new-newsgroups 'ask-server) + '(gnus-read-newsrc-file t) + '(gnus-read-active-file 'some) + '(gnus-save-killed-list t) + '(gnus-save-newsrc-file t) + '(gnus-use-dribble-file t))) + +(with-eval-after-load 'gnus-sum + (custom-set-variables + '(gnus-thread-hide-subtree t))) #+end_src ** [[info:emacs#Sending Mail][Sending Mail (info)]]