Commit f4b487628da3

@@ -78,7 +78,7 @@
   :bind (("C-x C-b" . vde-ibuffer-open)
          ([remap list-buffers] . ibuffer)
          :map ibuffer-mode-map
-         ("q" . vde-pop-window-configuration))
+         ("q" . vde-pop-window-configuration)) 
   :config
   (setq
    ibuffer-expert t              ; Do not prompt when on kill buffers operations
@@ -102,24 +102,24 @@
      (t (format "%8d" (buffer-size)))))
 
   (setq ibuffer-formats
-                 '((mark modified read-only " "
-                         (name 18 18 :left :elide)
-                         " "
-                         (size-h 9 -1 :right)
-                         " "
-                         (mode 16 16 :left :elide)
-                         " "
-                         filename-and-process)
-                   (mark modified read-only " "
-                         (name 18 18 :left :elide)
-                         " "
-                         (size 9 -1 :right)
-                         " "
-                         (mode 16 16 :left :elide)
-                         " "
-                         (vc-status 16 16 :left)
-                         " "
-                         filename-and-process))))
+        '((mark modified read-only " "
+                (name 18 18 :left :elide)
+                " "
+                (size-h 9 -1 :right)
+                " "
+                (mode 16 16 :left :elide)
+                " "
+                filename-and-process)
+          (mark modified read-only " "
+                (name 18 18 :left :elide)
+                " "
+                (size 9 -1 :right)
+                " "
+                (mode 16 16 :left :elide)
+                " "
+                (vc-status 16 16 :left)
+                " "
+                filename-and-process))))
 
 (use-package ibuffer-vc                 ; Group buffers by VC project and status
   :defer 2

@@ -5,6 +5,7 @@
               ("M-u" . ivy-resume)    ;Override the default binding for `upcase-word'
               ("C-c w" . ivy-push-view) ;Push window configuration to `ivy-views'
               ("C-c W" . ivy-pop-view)) ;Remove window configuration from `ivy-views'
+  :chords (("bb" . ivy-switch-buffer))
   :init
   (progn
     (bind-to-vde-map "v" #'counsel-set-variable))
@@ -59,6 +60,7 @@
 	      ([remap finder-by-keyword] . counsel-package) ;C-h p
 	      ([remap describe-variable] . counsel-describe-variable)
 	      ([remap describe-function] . counsel-describe-function))
+  :chords (("ff" . counsel-find-file))
   :init
   (progn
     (bind-to-vde-map "s" #'counsel-rg))

@@ -1,3 +1,11 @@
+(use-package key-chord
+  :chords
+  (("''" . "’"))
+  :custom
+  (key-chord-two-keys-delay 0.05)
+  :config
+  (key-chord-mode 1))
+
 (use-package which-key
   :init (which-key-mode)
   :config

@@ -3,7 +3,10 @@
          ("C-c n b" . avy-pop-mark)
          ("C-c n j" . avy-goto-char-2)
          ("C-c n t" . avy-goto-char-timer)
-         ("C-c n w" . avy-goto-word-1)))
+         ("C-c n w" . avy-goto-word-1)) 
+  :chords (("jj" . avy-goto-char-timer)
+           ("jk" . avy-goto-word-or-subword-1)
+           ("jl" . avy-goto-line)))
 
 (use-package bm
   :bind (("C-c b b" . bm-toggle)

@@ -1,5 +1,6 @@
 (use-package projectile                 ; Project management
   :init (projectile-mode)
+  :chords (("gf" . projectile-find-file))
   :config
   ;; Remove dead projects when Emacs is idle
   (run-with-idle-timer 10 nil #'projectile-cleanup-known-projects)
@@ -13,6 +14,7 @@
   :bind (:map projectile-command-map
               ("p" . counsel-projectile-switch-project)
               ("r" . counsel-projectile-rg))
+  :chords (("gg" . counsel-projectile-rg))
   :init (counsel-projectile-mode)
   :config
   (ivy-set-display-transformer

@@ -13,6 +13,7 @@
          ("C-c v l" . magit-log-buffer-file)
          ("C-c v p" . magit-pull)
          ("C-c v v" . magit-status))
+  :chords (("gs" . magit-status))
   :config
   (setq
    magit-save-repository-buffers 'dontask

@@ -49,6 +49,9 @@
 
 (use-package dash) ; A modern list library
 
+(use-package use-package-chords :ensure t :pin melpa)
+(use-package use-package-ensure-system-package :ensure t :pin melpa)
+
 (require 'subr-x)
 (require 'time-date)