[elpa] externals/ellama 99f80b212a 2/7: Improve lazy loading (shr, eww)

[ELPA Syncer]

branch: externals/ellama
commit 99f80b212a3a88a263090312aef0567bf8345f57
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Improve lazy loading (shr, eww)
---
 ellama.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ellama.el b/ellama.el
index 8e85c04eaf..07ec133a7b 100644
--- a/ellama.el
+++ b/ellama.el
@@ -42,8 +42,6 @@
 (require 'spinner)
 (require 'transient)
 (require 'info)
-(require 'shr)
-(require 'eww)
 (require 'vc)
 (require 'compat)
 (eval-when-compile (require 'rx))
@@ -1243,6 +1241,8 @@ If EPHEMERAL non nil new session will not be associated 
with any file."
 (defun ellama-context-add-webpage-quote-eww ()
   "Add webpage quote to context interactively from `eww'."
   (interactive)
+  (defvar eww-data)
+  (declare-function eww-current-url "eww")
   (if (eq major-mode 'eww-mode)
       (let* ((name (plist-get eww-data :title))
             (url (eww-current-url))
@@ -2040,7 +2040,7 @@ otherwise prompt user for URL to summarize."
   (interactive
    (list
     (if-let ((url (or (and (fboundp 'thing-at-point) (thing-at-point 'url))
-                      (shr-url-at-point nil))))
+                      (and (fboundp 'shr-url-at-point) (shr-url-at-point 
nil)))))
         url
       (read-string "Enter URL you want to summarize: "))))
   (let ((buffer-name (url-retrieve-synchronously url t)))