diff options
author | Case Duckworth | 2021-08-30 23:39:21 -0500 |
---|---|---|
committer | Case Duckworth | 2021-08-30 23:39:21 -0500 |
commit | d9779d4fa2956071f65e8a113fa8d639466d3624 (patch) | |
tree | 38ec9183eea80013d8106e070fa9d96556f32830 | |
parent | Add goto-addr-mode--turn-on to acdw-compat (diff) | |
download | emacs-d9779d4fa2956071f65e8a113fa8d639466d3624.tar.gz emacs-d9779d4fa2956071f65e8a113fa8d639466d3624.zip |
Make more ... compatible? with 27 ???
-rw-r--r-- | init.el | 4 | ||||
-rw-r--r-- | lisp/acdw-compat.el | 2 |
2 files changed, 4 insertions, 2 deletions
diff --git a/init.el b/init.el index 0bc68be..55049af 100644 --- a/init.el +++ b/init.el | |||
@@ -293,7 +293,7 @@ package. This macro is not repeatable." | |||
293 | 293 | ||
294 | (add-hook 'emacs-lisp-mode-hook | 294 | (add-hook 'emacs-lisp-mode-hook |
295 | (defun emacs-lisp@enforce-lexical-binding () | 295 | (defun emacs-lisp@enforce-lexical-binding () |
296 | (elisp-enable-lexical-binding))) | 296 | (setq-local lexical-binding t))) |
297 | 297 | ||
298 | (add-hook 'emacs-lisp-mode-hook | 298 | (add-hook 'emacs-lisp-mode-hook |
299 | (defun emacs-lisp@imenu-add-setup () | 299 | (defun emacs-lisp@imenu-add-setup () |
@@ -543,7 +543,7 @@ like a dumbass." | |||
543 | (:global "C-c n" gnus)) | 543 | (:global "C-c n" gnus)) |
544 | 544 | ||
545 | (setup goto-addr | 545 | (setup goto-addr |
546 | (global-goto-address-mode +1)) | 546 | (add-hook 'after-change-major-mode-hook #'goto-address-mode)) |
547 | 547 | ||
548 | (setup ibuffer | 548 | (setup ibuffer |
549 | (:also-load ibuf-ext) | 549 | (:also-load ibuf-ext) |
diff --git a/lisp/acdw-compat.el b/lisp/acdw-compat.el index d7ac18b..1d45806 100644 --- a/lisp/acdw-compat.el +++ b/lisp/acdw-compat.el | |||
@@ -540,6 +540,8 @@ Used in `repeat-mode'.") | |||
540 | 540 | ||
541 | ;;; goto-address-mode | 541 | ;;; goto-address-mode |
542 | (safe-define | 542 | (safe-define |
543 | (defvar global-address-mode nil) | ||
544 | |||
543 | (define-globalized-minor-mode global-goto-address-mode | 545 | (define-globalized-minor-mode global-goto-address-mode |
544 | goto-address-mode goto-addr-mode--turn-on | 546 | goto-address-mode goto-addr-mode--turn-on |
545 | :version "28.1") | 547 | :version "28.1") |