From 4a1e400118e6def84a03f4219fc4828d61be5d07 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Mon, 30 Aug 2021 22:45:51 -0500
Subject: Add goto-addr-mode--turn-on to acdw-compat

---
 lisp/acdw-compat.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'lisp/acdw-compat.el')

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'.")
 (safe-define
  (define-globalized-minor-mode global-goto-address-mode
    goto-address-mode goto-addr-mode--turn-on
-   :version "28.1"))
+   :version "28.1")
+
+ (defun goto-addr-mode--turn-on ()
+   (when (not goto-address-mode)
+     (goto-address-mode 1))))
 
 (provide 'acdw-compat)
 ;;; acdw-compat.el ends here
-- 
cgit 1.4.1-21-gabe81