lang/org: add full link at point display to eldoc

modules/lang/org/autoload/org.el

@@ -463,3 +463,10 @@ an effect when `evil-org-special-o/O' has `item' in it (not the default)."
                (backward-char 1)
                (evil-append nil))))
     (funcall orig-fn count)))
+
+;;;###autoload
+(defun +org*display-link-in-eldoc (orig-fn &rest args)
+  "Display the link at point in eldoc."
+  (or (when-let* ((link (org-element-property :raw-link (org-element-context))))
+        (format "Link: %s" link))
+      (apply orig-fn args)))

modules/lang/org/config.el

@@ -287,6 +287,8 @@ unfold to point on startup."
    org-preview-latex-image-directory (concat doom-cache-dir "org-latex/")
    org-format-latex-options (plist-put org-format-latex-options :scale 1.5))
 
+  (advice-add #'org-eldoc-documentation-function :around #'+org*display-link-in-eldoc)
+
   ;; Don't do automatic indent detection in org files
   (add-to-list 'doom-detect-indentation-excluded-modes 'org-mode nil #'eq)