Return a definition path even if we don't have a position

1 files changed, 3 insertions, 2 deletions

diff --git a/helpful.el b/helpful.el
index 4cc71a8..a74965d 100644
--- a/helpful.el
+++ b/helpful.el
@@ -323,8 +323,9 @@ If the source code cannot be found, return the sexp used."
 
 (defun helpful--source-path (sym callable-p)
   "Return the path where SYM is defined."
-  (-when-let ((buf . pos) (helpful--definition sym callable-p))
-    (buffer-file-name buf)))
+  (-let [(buf . _) (helpful--definition sym callable-p)]
+    (when buf
+      (buffer-file-name buf))))
 
 (defun helpful--source-pos (sym callable-p)
   "Return the file position where SYM is defined."