core: allow links surrounded with [[]] in release notes

This commit is contained in:
syl20bnr 2016-10-10 00:50:29 -04:00
parent 22aafd9523
commit 574b2ffe5d
1 changed files with 8 additions and 0 deletions

View File

@ -277,6 +277,14 @@ HELP-STRING is the help message of the button for additional action."
(let* ((note (concat "\n" (spacemacs//render-framed-text
file spacemacs-buffer--banner-length caption))))
(add-to-list 'spacemacs-buffer--note-widgets (widget-create 'text note))
(save-excursion
(while (re-search-backward "\\[\\[\\(.*\\)\\]\\]" nil t)
(let ((buffer-read-only nil))
(make-text-button
(match-beginning 1)
(match-end 1)
'type 'help-url
'help-args (list (match-string 1))))))
(funcall additional-widgets))))
(defun spacemacs-buffer//insert-note-p (type)