diff options
author | Chaitanya Koparkar <ckoparkar@live.in> | 2016-05-06 12:27:24 +0530 |
---|---|---|
committer | Bozhidar Batsov <bozhidar.batsov@gmail.com> | 2016-05-05 23:57:24 -0700 |
commit | 4e43293527b305f5cc05a38e4ca1701c1a1d2f1d (patch) | |
tree | d4eaa8d89933f76c643c6e1283d6890cf63b72aa /cider-util.el | |
parent | 42776938e87985cc6dd09f5234c085be433501c0 (diff) |
Fix eldoc errors for empty parentheses (#1734)
Diffstat (limited to 'cider-util.el')
-rw-r--r-- | cider-util.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/cider-util.el b/cider-util.el index 9ae52789..fbe00e7b 100644 --- a/cider-util.el +++ b/cider-util.el @@ -128,11 +128,11 @@ find a symbol if there isn't one at point." "Return destructured `cider-symbol-at-point'. If the symbol at point is of the form ns-name/thing-name, returns a dict \(\"ns\" \"ns-name\" \"thing\" \"thing-name\")." - (let* ((sym (cider-symbol-at-point)) - (ns-thing (split-string sym "/"))) - (if (< (length ns-thing) 2) - (nrepl-dict "thing" (car ns-thing)) - (nrepl-dict "ns" (car ns-thing) "thing" (cadr ns-thing))))) + (if-let ((sym (cider-symbol-at-point)) + (ns-thing (split-string sym "/"))) + (if (< (length ns-thing) 2) + (nrepl-dict "thing" (car ns-thing)) + (nrepl-dict "ns" (car ns-thing) "thing" (cadr ns-thing))))) ;;; sexp navigation |