]> code.delx.au - gnu-emacs-elpa/commitdiff
counsel.el: add outline for `counsel-mode'
authorOleh Krehel <ohwoeowho@gmail.com>
Thu, 3 Mar 2016 07:58:13 +0000 (08:58 +0100)
committerOleh Krehel <ohwoeowho@gmail.com>
Thu, 3 Mar 2016 07:58:13 +0000 (08:58 +0100)
counsel.el

index 456b8637c8d0aad369da775e2957c1de3d83e4ba..d806ee7fc1259b8734c4764388918825b02f3b40 100644 (file)
@@ -1688,17 +1688,18 @@ An extra action allows to switch to the process buffer."
               ("e" counsel-rhythmbox-enqueue-song "Enqueue song"))
             :caller 'counsel-rhythmbox))
 
+;;** `counsel-mode'
 (defvar counsel-mode-map
   (let ((map (make-sparse-keymap)))
     (dolist (binding
-             '((describe-bindings . counsel-descbinds)
-               (describe-function . counsel-describe-function)
-               (describe-variable . counsel-describe-variable)
-               (find-file         . counsel-find-file)
-               (imenu             . counsel-imenu)
-               (load-library      . counsel-load-library)
-               (load-theme        . counsel-load-theme)
-               (yank-pop          . counsel-yank-pop)))
+              '((describe-bindings . counsel-descbinds)
+                (describe-function . counsel-describe-function)
+                (describe-variable . counsel-describe-variable)
+                (find-file . counsel-find-file)
+                (imenu . counsel-imenu)
+                (load-library . counsel-load-library)
+                (load-theme . counsel-load-theme)
+                (yank-pop . counsel-yank-pop)))
       (define-key map (vector 'remap (car binding)) (cdr binding)))
     map)
   "Map for `counsel-mode'. Remaps built-in functions to counsel
@@ -1715,7 +1716,6 @@ replacements. "
   :keymap counsel-mode-map
   :lighter " counsel")
 
-
 (provide 'counsel)
 
 ;;; counsel.el ends here