[elpa] externals/org-real e38ae9b 131/160: Added help-echo slot for minibuffer messages

[ELPA Syncer]

branch: externals/org-real
commit e38ae9b9ba5d7d21bf2c861ec379d4a7d7b1f149
Author: Tyler Grinn <tylergrinn@gmail.com>
Commit: Tyler Grinn <tylergrinn@gmail.com>

    Added help-echo slot for minibuffer messages
---
 org-real.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/org-real.el b/org-real.el
index 81c6431..a023713 100644
--- a/org-real.el
+++ b/org-real.el
@@ -702,6 +702,8 @@ ORIG is `org-insert-link', ARGS are the arguments passed to 
it."
               :type list)
    (metadata :initarg :metadata
              :type string)
+   (help-echo :initarg :help-echo
+             :type string)
    (rel-box :initarg :rel-box
             :type org-real-box)
    (display-rel :initarg :display-rel
@@ -1216,6 +1218,8 @@ If INCLUDE-ON-TOP is non-nil, also include height on top 
of box."
           (save-excursion
             (if (eq dir 'entered)
                 (progn
+                  (if (slot-boundp box :help-echo)
+                      (message (oref box :help-echo)))
                   (if (slot-boundp box :metadata)
                       (setq tooltip-timer (org-real--tooltip metadata))
                     (if (and (slot-boundp box :name) (slot-boundp box :rel))