branch: elpa/gnosis
commit fdd0e0e0aff78e5314b084a100aa630470c175f6
Author: Thanos Apollo <[email protected]>
Commit: Thanos Apollo <[email protected]>
output-themata: Format links in keimenon.
---
gnosis-dashboard.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/gnosis-dashboard.el b/gnosis-dashboard.el
index cb74e943c8..c52e73e3af 100644
--- a/gnosis-dashboard.el
+++ b/gnosis-dashboard.el
@@ -217,7 +217,12 @@ DATE: Integer, used with `gnosis-algorithm-date' to get
previous dates."
collect (mapconcat (lambda (x) (format "%s" x))
item ",")
else
collect
- (replace-regexp-in-string "\n" " " (format "%s"
item))))))))
+ (let ((formatted (replace-regexp-in-string "\n" "
" (format "%s" item))))
+ ;; Strip org-link markup, keeping only
descriptions
+ (replace-regexp-in-string
+ "\\[\\[id:[^]]+\\]\\[\\(.*?\\)\\]\\]"
+ "\\1"
+ formatted))))))))
(defun gnosis-dashboard-output-themata (thema-ids)
"Return THEMA-IDS contents on gnosis dashboard."
