From 915f5639d821be8f1847d80a770840437c358c88 Mon Sep 17 00:00:00 2001 From: Roger Gilliar Date: Mon, 12 Oct 2015 18:56:08 +0200 Subject: [Fix #1348] Remove dash dependency --- cider-doc.el | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'cider-doc.el') diff --git a/cider-doc.el b/cider-doc.el index 48ce0ed6..e69f39d7 100644 --- a/cider-doc.el +++ b/cider-doc.el @@ -26,12 +26,14 @@ ;;; Code: (require 'cider-common) +(require 'cider-compat) +(require 'cider-util) (require 'cider-popup) (require 'cider-client) +(require 'cider-grimoire) (require 'nrepl-client) (require 'org-table) (require 'button) -(require 'dash) (require 'easymenu) @@ -202,8 +204,8 @@ opposite of what that option dictates." "Open the source for the current symbol, if available." (interactive) (if cider-docview-file - (-if-let (buffer (and (not (cider--tooling-file-p cider-docview-file)) - (cider-find-file cider-docview-file))) + (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) @@ -236,12 +238,12 @@ opposite of what that option dictates." (defun cider-create-doc-buffer (symbol) "Populates *cider-doc* with the documentation for SYMBOL." - (-when-let (info (cider-var-info symbol)) + (when-let (info (cider-var-info symbol)) (cider-docview-render (cider-make-popup-buffer cider-doc-buffer) symbol info))) (defun cider-doc-lookup (symbol) "Look up documentation for SYMBOL." - (-if-let (buffer (cider-create-doc-buffer symbol)) + (if-let (buffer (cider-create-doc-buffer symbol)) (cider-popup-buffer-display buffer t) (user-error "Symbol %s not resolved" symbol))) -- cgit v1.2.3