Info: Define helm switcher

.emacs.d/init.el

@@ -250,6 +250,15 @@
 ;; (nconc 'package-selected-packages '(info-colors))
 (when (require 'info-colors nil t)
   (add-hook 'Info-selection-hook 'info-colors-fontify-node))
+(with-eval-after-load 'helm
+  (helm-defswitcher
+   "Info"
+   (lambda (b)
+     (with-current-buffer b
+       (derived-mode-p 'Info-mode)))
+   (lambda (&optional candidate)
+     (info nil (when candidate (format "*info*<%s>" candidate))))))
+(global-set-key (kbd "C-h i") 'helm-info-switch)
 
 ;;; IRC
 (nconc package-selected-packages '(circe))