diff options
| author | Bozhidar Batsov <bozhidar@batsov.com> | 2015-04-19 18:26:43 +0300 |
|---|---|---|
| committer | Bozhidar Batsov <bozhidar@batsov.com> | 2015-04-19 18:26:43 +0300 |
| commit | 4a9147f825286ca3c7c7815126083d02937e6895 (patch) | |
| tree | 1855c8d38b91270458b4d53d3865a6b2d0615f45 | |
| parent | c777d489c25e640a2404ba67c8c8c3164b3c380c (diff) | |
[#1069] Show a link to the source in the doc buffer
| -rw-r--r-- | cider-doc.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/cider-doc.el b/cider-doc.el index 77250413..7baa4790 100644 --- a/cider-doc.el +++ b/cider-doc.el @@ -353,6 +353,11 @@ Tables are marked to be ignored by line wrap." (browse-url (button-get x 'url)))) (insert ".") (newline)) + (newline) + (insert-text-button "[source]" + 'follow-link t + 'action (lambda (x) + (cider-docview-source))) (let ((beg (point-min)) (end (point-max))) (nrepl-dict-map (lambda (k v) |