diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-07-01 09:26:03 +0100 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2015-07-01 20:50:09 +0100 |
commit | d705a2c8b3c6d6c5b83237ce754e123b34112bdd (patch) | |
tree | 525d5296736969442e7235138c0f073d154a370f /cider-doc.el | |
parent | fe7675ca1dc7cf0c54eca155a35cc87952350fe4 (diff) |
More informative error on cider-docview-file
Diffstat (limited to 'cider-doc.el')
-rw-r--r-- | cider-doc.el | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/cider-doc.el b/cider-doc.el index b2c833e9..dff73104 100644 --- a/cider-doc.el +++ b/cider-doc.el @@ -175,10 +175,15 @@ "Open the source for the current symbol, if available." (interactive) (if cider-docview-file - (let ((buffer (and cider-docview-file - (not (cider--tooling-file-p cider-docview-file)) - (cider-find-file cider-docview-file)))) - (cider-jump-to buffer (cons cider-docview-line nil) nil)) + (-if-let (buffer (and (not (cider--tooling-file-p cider-docview-file)) + (cider-find-file cider-docview-file))) + (cider-jump-to buffer (if cider-docview-line + (cons cider-docview-line nil) + cider-docview-symbol) + nil) + (user-error + (substitute-command-keys + "Can't find the source because it wasn't defined with `cider-eval-buffer'"))) (error "No source location for %s" cider-docview-symbol))) (defun cider-docview-grimoire () |