spacemacs/layers/+readers/dash/funcs.el

26 lines
854 B
EmacsLisp
Raw Normal View History

2016-06-20 07:13:20 +00:00
;;; funcs.el --- Dash Layer functions File for Spacemacs
;;
2018-01-04 07:00:25 +00:00
;; Copyright (c) 2012-2018 Sylvain Benner & Contributors
2016-06-20 07:13:20 +00:00
;;
;; URL: https://github.com/syl20bnr/spacemacs
;;
;; This file is not part of GNU Emacs.
;;
;;; License: GPLv3
(defun dash//activate-package-docsets (path)
"Add dash docsets from specified PATH."
(when (not (string-blank-p path))
(setq dash-docs-docsets-path (expand-file-name path)))
(setq dash-docs-common-docsets (dash-docs-installed-docsets))
2016-06-20 07:13:20 +00:00
(message (format "activated %d docsets from: %s"
(length dash-docs-common-docsets) path)))
2017-05-19 01:49:18 +00:00
(defun counsel-dash-at-point ()
"Counsel dash with selected point"
(interactive)
(counsel-dash
(if (use-region-p)
(buffer-substring-no-properties (region-beginning) (region-end))
(substring-no-properties (or (thing-at-point 'symbol) "")))))