Add goto-addr as dependency

This commit is contained in:
contrapunctus 2021-03-16 23:46:22 +05:30
parent 0b30484bac
commit 6982b492fa
2 changed files with 6 additions and 4 deletions

View File

@ -32,6 +32,8 @@
;;; Code:
(require 'goto-addr)
(require 'cl)
(require 'password-cache)
(condition-case nil
@ -5684,8 +5686,6 @@ If DONT-PRINT-NICK-P is true, don't include nickname."
"Call `goto-address' on the newly written text."
(when (eq mode :insert)
(ignore-errors
;; `goto-address' is autoloaded, but `goto-address-fontify' is not.
(require 'goto-addr)
(let ((end (point))
(limit (max (- (point) 1000) (1+ (point-min)))))
;; We only need to fontify the text written since the last

View File

@ -205,6 +205,10 @@ If a source block does not have syntax highlighting, press =M-o M-o= (=font-lock
#+END_SRC
** Dependencies
#+BEGIN_SRC emacs-lisp
(require 'goto-addr)
#+END_SRC
** Code
*** various utility functions
:PROPERTIES:
@ -7185,8 +7189,6 @@ If DONT-PRINT-NICK-P is true, don't include nickname."
"Call `goto-address' on the newly written text."
(when (eq mode :insert)
(ignore-errors
;; `goto-address' is autoloaded, but `goto-address-fontify' is not.
(require 'goto-addr)
(let ((end (point))
(limit (max (- (point) 1000) (1+ (point-min)))))
;; We only need to fontify the text written since the last