diff options
author | Case Duckworth | 2021-08-30 22:45:51 -0500 |
---|---|---|
committer | Case Duckworth | 2021-08-30 22:45:51 -0500 |
commit | 4a1e400118e6def84a03f4219fc4828d61be5d07 (patch) | |
tree | f6f4b9374692cba20307485dc5b59cb01885a581 | |
parent | Rewrite acdw-compat to more easily copy-paste stuff (diff) | |
download | emacs-4a1e400118e6def84a03f4219fc4828d61be5d07.tar.gz emacs-4a1e400118e6def84a03f4219fc4828d61be5d07.zip |
Add goto-addr-mode--turn-on to acdw-compat
-rw-r--r-- | lisp/acdw-compat.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/acdw-compat.el b/lisp/acdw-compat.el index 27dd8ef..d7ac18b 100644 --- a/lisp/acdw-compat.el +++ b/lisp/acdw-compat.el | |||
@@ -542,7 +542,11 @@ Used in `repeat-mode'.") | |||
542 | (safe-define | 542 | (safe-define |
543 | (define-globalized-minor-mode global-goto-address-mode | 543 | (define-globalized-minor-mode global-goto-address-mode |
544 | goto-address-mode goto-addr-mode--turn-on | 544 | goto-address-mode goto-addr-mode--turn-on |
545 | :version "28.1")) | 545 | :version "28.1") |
546 | |||
547 | (defun goto-addr-mode--turn-on () | ||
548 | (when (not goto-address-mode) | ||
549 | (goto-address-mode 1)))) | ||
546 | 550 | ||
547 | (provide 'acdw-compat) | 551 | (provide 'acdw-compat) |
548 | ;;; acdw-compat.el ends here | 552 | ;;; acdw-compat.el ends here |