Further editing configuration

init.el

@@ -160,15 +160,9 @@
   ;; Kill other window (cyclic order).
   (global-set-key (kbd "C-x C-q") 'quit-other-window)
 
-  ;; Toggle whitespace mode.
-  (global-set-key (kbd "C-c w") 'whitespace-mode)
-
   ;; Change active window.  More convenient than "C-x o".
   (global-set-key (kbd "M-o") 'other-window)
 
-  ;; Occur. More convenient than "M-s o"
-  (global-set-key (kbd "M-s M-o") 'occur)
-
   ;; --------------------------------------------------------------------------
   ;; Aliases.
   ;; --------------------------------------------------------------------------

modules/editing.el

@@ -20,7 +20,9 @@
       '(rainbow-mode
         rainbow-delimiters
         highlight-parentheses
-        whole-line-or-region)
+        whole-line-or-region
+        duplicate-thing
+        volatile-highlights)
 
       )
 
@@ -28,6 +30,21 @@
 
 (defun init-packages/init-editing ()
 
+  ;; --------------------------------------------------------------------------
+  ;; Duplicate things.
+  ;; --------------------------------------------------------------------------
+
+  (use-package duplicate-thing
+    :defer t
+    :bind (("M-c" . duplicate-thing)))
+
+  ;; --------------------------------------------------------------------------
+  ;; Volatile highlights - highlight changes caused by undo, yank, etc.
+  ;; --------------------------------------------------------------------------
+
+  (use-package volatile-highlights)
+  (volatile-highlights-mode t)
+
   ;; --------------------------------------------------------------------------
   ;; Parentheses highlighting.
   ;; --------------------------------------------------------------------------
@@ -183,4 +200,14 @@
       (let ((transient-mark-mode nil))
         (yank-advised-indent-function (region-beginning) (region-end)))))
 
+  ;; --------------------------------------------------------------------------
+  ;; Additional key-bindingds.
+  ;; --------------------------------------------------------------------------
+
+  ;; Toggle whitespace mode.
+  (global-set-key (kbd "C-c w") 'whitespace-mode)
+
+  ;; Occur. More convenient than "M-s o"
+  (global-set-key (kbd "M-s M-o") 'occur)
+
   )

modules/workflow.el

@@ -31,7 +31,6 @@
   ;; --------------------------------------------------------------------------
 
   (use-package workgroups2
-    :defer t
     :config
     ;; Don't save.  Workgroups are transient to the session.
     (setq wg-emacs-exit-save-behavior           nil)