make custom-id links have a message.

[org-ref.git] / org-ref.org

diff --git a/org-ref.org b/org-ref.org
index db0e205a640c15f9b5c004c4bcf59adf8a33d4fc..05828740cf76a05a5d81c8d8476965f5fe01bb47 100644 (file)
--- a/org-ref.org
+++ b/org-ref.org
@@ -3107,6 +3107,12 @@ To get a lighter weight message about the label, ref and cite links, we define a
                                (> count 1))
                        "s")))))
 
+        ((string= type "custom-id")
+         (save-excursion
+           (org-open-link-from-string
+            (format "[[#%s]]" (org-element-property :path object)))
+           (message "%s" (org-get-heading))))
+
          ;; check if the bibliography files exist.
         ((string= type "bibliography")
          (let* ((bibfile)