From 043cf9aa1978b61d28be03234975fc32336fe2ae Mon Sep 17 00:00:00 2001
From: Amin Bandali <bandali@gnu.org>
Date: Thu, 28 Mar 2019 00:58:03 -0400
Subject: [PATCH] [emacs] decrease :defer delays

---
 init.org | 46 +++++++++++++++++++++++-----------------------
 1 file changed, 23 insertions(+), 23 deletions(-)

diff --git a/init.org b/init.org
index bc1be0c..120d7ce 100644
--- a/init.org
+++ b/init.org
@@ -400,7 +400,7 @@ in my shell.
 
 #+begin_src emacs-lisp
 (use-package exec-path-from-shell
-  :defer 1
+  :defer 0.4
   :init
   (setq exec-path-from-shell-arguments           nil
         exec-path-from-shell-check-startup-files nil)
@@ -431,7 +431,7 @@ See [[https://www.gnu.org/software/emacs/manual/html_node/emacs/Emacs-Server.htm
 
 #+begin_src emacs-lisp
 (use-feature server
-  :defer 1
+  :defer 0.4
   :config (or (server-running-p) (server-mode)))
 #+end_src
 
@@ -507,14 +507,14 @@ buffers and/or modes.
       scroll-preserve-screen-position 1)
 
 (use-feature mwheel
-  :defer 1
+  :defer 0.4
   :config
   (setq mouse-wheel-scroll-amount '(1 ((shift) . 1)) ; one line at a time
         mouse-wheel-progressive-speed nil            ; don't accelerate scrolling
         mouse-wheel-follow-mouse t))                 ; scroll window under mouse
 
 (use-feature pixel-scroll
-  :defer 1
+  :defer 0.4
   :config (pixel-scroll-mode 1))
 #+end_src
 
@@ -883,7 +883,7 @@ And here's where my actual Org configurations begin:
 
 #+begin_src emacs-lisp
 (use-feature org
-  :defer 2
+  :defer 0.5
   :config
   (setq org-src-tab-acts-natively t
         org-src-preserve-indentation nil
@@ -992,7 +992,7 @@ Not just how I do git, but /the/ way to do git.
 
 #+begin_src emacs-lisp
 (use-package magit
-  :defer 2
+  :defer 0.5
   :bind (("C-x g" . magit-status)
          ("s-g s" . magit-status)
          ("s-g l" . magit-log-buffer-file))
@@ -1016,7 +1016,7 @@ Recently opened files.
 
 #+begin_src emacs-lisp
 (use-feature recentf
-  :defer 0.5
+  :defer 0.2
   :config
   (add-to-list 'recentf-exclude "^/\\(?:ssh\\|su\\|sudo\\)?:")
   (setq recentf-max-saved-items 40))
@@ -1047,7 +1047,7 @@ There's no way I could top that, so I won't attempt to.
 
 #+begin_src emacs-lisp
 (use-package ivy
-  :defer 0.6
+  :defer 0.3
   :bind
   (:map ivy-minibuffer-map
    ([escape] . keyboard-escape-quit)
@@ -1095,7 +1095,7 @@ There's no way I could top that, so I won't attempt to.
 
 #+begin_src emacs-lisp
 (use-feature eshell
-  :defer 2
+  :defer 0.5
   :commands eshell
   :bind ("C-c a s e" . eshell)
   :config
@@ -1378,7 +1378,7 @@ Automatically save place in each file.
 
 #+begin_src emacs-lisp
 (use-package company
-  :defer 3
+  :defer 0.6
   :bind
   (:map company-active-map
         ([tab]    . company-complete-common-or-cycle)
@@ -1397,7 +1397,7 @@ Automatically save place in each file.
 
 #+begin_src emacs-lisp
 (use-package flycheck
-  :defer 3
+  :defer 0.6
   :hook (prog-mode . flycheck-mode)
   :bind
   (:map flycheck-mode-map
@@ -1412,7 +1412,7 @@ Automatically save place in each file.
 
 ;; http://endlessparentheses.com/ispell-and-apostrophes.html
 (use-package ispell
-  :defer 3
+  :defer 0.6
   :config
   ;; ’ can be part of a word
   (setq ispell-local-dictionary-alist
@@ -1474,7 +1474,7 @@ Automatically save place in each file.
 #+begin_src emacs-lisp
 (eval-when-compile (defvar lean-mode-map))
 (use-package lean-mode
-  :defer 1
+  :defer 0.4
   :bind (:map lean-mode-map
               ("S-SPC" . company-complete))
   :config
@@ -1853,7 +1853,7 @@ Emacs package that displays available keybindings in popup
 
 #+begin_src emacs-lisp
 (use-package which-key
-  :defer 1
+  :defer 0.4
   :config
   (which-key-add-key-based-replacements
     ;; prefixes for global prefixes and minor modes
@@ -1968,7 +1968,7 @@ Emacs package that displays available keybindings in popup
 
 #+begin_src emacs-lisp
 (use-package crux                       ; results in Waiting for git... [2 times]
-  :defer 1
+  :defer 0.4
   :bind (("C-c b k" . crux-kill-other-buffers)
          ("C-c d"   . crux-duplicate-current-line-or-region)
          ("C-c D"   . crux-duplicate-and-comment-current-line-or-region)
@@ -2014,7 +2014,7 @@ Emacs package that displays available keybindings in popup
 
 #+begin_src emacs-lisp
 (use-package helpful
-  :defer 3
+  :defer 0.6
   :bind
   (("C-S-h c" . helpful-command)
    ("C-S-h f" . helpful-callable)        ; helpful-function
@@ -2029,7 +2029,7 @@ Make =*scratch*= and =*Messages*= unkillable.
 
 #+begin_src emacs-lisp
 (use-package unkillable-scratch
-  :defer 3
+  :defer 0.6
   :config
   (unkillable-scratch 1)
   :custom
@@ -2046,7 +2046,7 @@ Make =*scratch*= and =*Messages*= unkillable.
 
 #+begin_src emacs-lisp
 (use-package boxquote
-  :defer 3
+  :defer 0.6
   :bind
   (:prefix-map a/boxquote-prefix-map
    :prefix "C-c q"
@@ -2086,7 +2086,7 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
 
 #+begin_src emacs-lisp
 (use-package typo
-  :defer 2
+  :defer 0.5
   :config
   (typo-global-mode 1)
   :hook (text-mode . typo-mode))
@@ -2096,7 +2096,7 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
 
 #+begin_src emacs-lisp
 (use-package hl-todo
-  :defer 4
+  :defer 0.5
   :config
   (global-hl-todo-mode))
 #+end_src
@@ -2105,7 +2105,7 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
 
 #+begin_src emacs-lisp
 (use-package shrink-path
-  :defer 2
+  :defer 0.5
   :after eshell
   :config
   (defun +eshell/prompt ()
@@ -2145,7 +2145,7 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
 
 #+begin_src emacs-lisp
 (use-package multi-term
-  :defer 3
+  :defer 0.6
   :bind (("C-c a s m" . multi-term-dedicated-toggle)
          :map term-mode-map
          ("C-c C-j" . term-char-mode)
@@ -2217,7 +2217,7 @@ Also see [[https://www.emacswiki.org/emacs/rebox2][rebox2]].
 
 #+begin_src emacs-lisp
 (use-package yasnippet
-  :defer 3
+  :defer 0.6
   :config
   (defconst yas-verbosity-cur yas-verbosity)
   (setq yas-verbosity 2)
-- 
2.20.1