diff options
| author | Case Duckworth | 2021-08-30 22:16:21 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-08-30 22:16:21 -0500 |
| commit | ee9119ab00c9740d12a2d6c4a9d4fb567802272c (patch) | |
| tree | 8a579bde63ff0a1b23d2a9a0ac6c1c5e7383e5de | |
| parent | Merge branch 'main' of tildegit.org:acdw/emacs (diff) | |
| download | emacs-ee9119ab00c9740d12a2d6c4a9d4fb567802272c.tar.gz emacs-ee9119ab00c9740d12a2d6c4a9d4fb567802272c.zip | |
Use global-goto-address-mode instead of individual hooks
| -rw-r--r-- | init.el | 3 | ||||
| -rw-r--r-- | lisp/acdw-compat.el | 6 |
2 files changed, 7 insertions, 2 deletions
| diff --git a/init.el b/init.el index 1a54c79..3bec7f4 100644 --- a/init.el +++ b/init.el | |||
| @@ -524,8 +524,7 @@ like a dumbass." | |||
| 524 | (:global "C-c n" gnus)) | 524 | (:global "C-c n" gnus)) |
| 525 | 525 | ||
| 526 | (setup goto-addr | 526 | (setup goto-addr |
| 527 | (add-hook 'text-mode-hook #'goto-address-mode) | 527 | (global-goto-address-mode +1)) |
| 528 | (add-hook 'prog-mode-hook #'goto-address-prog-mode)) | ||
| 529 | 528 | ||
| 530 | (setup ibuffer | 529 | (setup ibuffer |
| 531 | (:also-load ibuf-ext) | 530 | (:also-load ibuf-ext) |
| diff --git a/lisp/acdw-compat.el b/lisp/acdw-compat.el index 17df856..f9ba9af 100644 --- a/lisp/acdw-compat.el +++ b/lisp/acdw-compat.el | |||
| @@ -562,5 +562,11 @@ Used in `repeat-mode'.") | |||
| 562 | (put command 'repeat-map 'outline-editing-repeat-map)) | 562 | (put command 'repeat-map 'outline-editing-repeat-map)) |
| 563 | ) | 563 | ) |
| 564 | 564 | ||
| 565 | ;;; goto-address-mode | ||
| 566 | (unless (fboundp 'global-goto-address-mode) | ||
| 567 | (define-globalized-minor-mode global-goto-address-mode | ||
| 568 | goto-address-mode goto-addr-mode--turn-on | ||
| 569 | :version "28.1")) | ||
| 570 | |||
| 565 | (provide 'acdw-compat) | 571 | (provide 'acdw-compat) |
| 566 | ;;; acdw-compat.el ends here | 572 | ;;; acdw-compat.el ends here |