add form feed to help-mode buffers

init.el

@@ -9,8 +9,8 @@
 
 (package-initialize)
 
-(defalias '_prc 'package-refresh-contents)
-(defalias '_pi 'package-install)
+(defalias '/package-refresh-contents 'package-refresh-contents)
+(defalias '/package-install 'package-install)
 
 ;;; Use-Package
 
@@ -102,7 +102,7 @@
 
 (mapc 'load user-others-utils-list)
 
-(defalias '_su 'emacsredux-sudo-edit)
+(defalias '/sudo 'emacsredux-sudo-edit)
 
 ;;; Winner
 
@@ -114,7 +114,7 @@
 
 (use-package shell
   :config
-  (defalias '_sh 'shell))
+  (defalias '/shell 'shell))
 
 ;;; Paren
 
@@ -153,21 +153,29 @@
       '(menu-bar-mode scroll-bar-mode tool-bar-mode))
 
 (use-package doom-themes
-  :ensure t)
+  :ensure t
+  :defer t)
 
 (use-package color-theme-sanityinc-tomorrow
-  :ensure t)
+  :ensure t
+  :defer t)
 
-(add-to-list 'default-frame-alist '(font . "Iosevka Custom 13"))
+(use-package kaolin-themes
+  :ensure t
+  :defer t)
 
-(setq-default cursor-type 'bar)
+(add-to-list 'default-frame-alist '(font . "DejaVu Sans Mono 13"))
+
+(setq-default cursor-type 'box)
+(setq blink-cursor-blinks -1)
+(setq blink-cursor-interval 0.4)
 
 ;;; Electric Pair
 
 (use-package electric-pair
   :defer t
   :hook
-  ((prog-mode) . electric-pair-mode))
+  (prog-mode . electric-pair-mode))
 
 ;;; Aggressive Indent
 (use-package aggressive-indent
@@ -203,8 +211,8 @@
    :map ibuffer-mode-map
    ("q" . user-ibuffer-quit))
   :hook
-  ((ibuffer-mode) . ibuffer-auto-mode)
-  ((ibuffer-auto-mode) . ibuffer-set-filter-groups-by-mode)
+  (ibuffer-mode . ibuffer-auto-mode)
+  (ibuffer-auto-mode . ibuffer-set-filter-groups-by-mode)
   :config
   (fuco1-special-beginning-of-buffer ibuffer (ibuffer-forward-line 1))
   (fuco1-special-end-of-buffer ibuffer (ibuffer-backward-line 1)))
@@ -228,7 +236,7 @@
 (use-package dired
   :defer t
   :hook
-  ((dired-mode) . dired-hide-details-mode)
+  (dired-mode . dired-hide-details-mode)
   :init
   (setq dired-listing-switches "-la --group-directories-first")
   (setq dired-recursive-copies 'always)
@@ -274,10 +282,6 @@
   :defer t
   :init
   (setq counsel-find-file-at-point t)
-
-  (defun user-ivy-switch-file-search ()
-    (interactive)
-    (ivy-quit-and-run (counsel-fzf nil ivy--directory)))
   :bind
   (("C-s"     . counsel-grep-or-swiper)
    ("M-x"     . counsel-M-x)
@@ -287,8 +291,8 @@
    ("C-h v"   . counsel-describe-variable)
    ("C-c c u" . counsel-unicode-char)
    ("C-c c o" . counsel-outline))
-  (:map ivy-minibuffer-map
-        ("M-s r" . user-ivy-switch-file-search)))
+  :config
+  (defalias '/unicode 'counsel-unicode-char))
 
 ;;; Ivy
 
@@ -357,7 +361,7 @@
   :ensure t
   :defer t
   :hook
-  ((Info-mode org-mode text-mode) . form-feed-mode))
+  ((Info-mode org-mode text-mode help-mode) . form-feed-mode))
 
 ;;; Unfill
 
@@ -400,8 +404,7 @@
 (use-package lsp-mode
   :commands lsp
   :ensure t
-  :hook
-  (elixir-mode . lsp)
+  :hook elixir-mode
   :init
   (add-to-list 'exec-path user-system-dependencies))
 
@@ -598,3 +601,10 @@
   :bind
   (("C-c d" . define-word-at-point)
    ("C-c D" . define-word)))
+
+;;; Prism
+
+(use-package prism
+  :ensure t
+  :hook
+  (prog-mode . prism-mode))