Reindent prefix-alternatives invocations

dotfiles/emacs.d/README.org

@@ -1112,7 +1112,9 @@ For composing functions with an apply so that they can be used with the ~:around
 #+END_SRC
 
 #+BEGIN_SRC emacs-lisp
-(imalison:prefix-alternatives imalison:mark-ring helm-mark-ring helm-global-mark-ring)
+(imalison:prefix-alternatives imalison:mark-ring
+  helm-mark-ring
+  helm-global-mark-ring)
 #+END_SRC
 * Macros
 ** For editing literate config
@@ -1937,15 +1939,17 @@ I use helm for almost all emacs completion
       (interactive)
       (helm-do-ag default-directory (car (projectile-parse-dirconfig-file))))
 
-    (imalison:prefix-alternatives imalison:do-ag helm-projectile-ag
-                                  imalison:do-ag-default-directory helm-do-ag)
+    (imalison:prefix-alternatives imalison:do-ag
+      helm-projectile-ag
+      imalison:do-ag-default-directory
+      helm-do-ag)
+
     (imalison:prefix-alternatives imalison:projectile-find-file
       projectile-find-file
       projectile-find-file-other-window)
 
-    (imalison:let-around
-     imalison:set-options-do-ag
-     (lambda () (call-interactively 'imalison:do-ag))
+    (imalison:let-around imalison:set-options-do-ag
+      imalison:do-ag
       (helm-ag-always-set-extra-option t))
 
     (defun projectile-make-all-subdirs-projects (directory)
@@ -1976,7 +1980,9 @@ I use helm for almost all emacs completion
 (use-package avy
   :preface
   (progn
-    (imalison:prefix-alternatives imalison:avy avy-goto-word-1 avy-goto-char))
+    (imalison:prefix-alternatives imalison:avy
+      avy-goto-word-1
+      avy-goto-char))
   :bind (("C-j" . imalison:avy)
          ("M-g l" . avy-goto-line)
          ("C-'" . avy-goto-char-2)))
@@ -1985,7 +1991,9 @@ I use helm for almost all emacs completion
 #+BEGIN_SRC emacs-lisp
 (use-package ace-window
   :preface
-  (imalison:prefix-alternatives imalison:ace-window ace-select-window ace-swap-window)
+  (imalison:prefix-alternatives imalison:ace-window
+    ace-select-window
+    ace-swap-window)
   :config (setq aw-keys '(?a ?s ?d ?f ?g ?h ?j ?k ?l))
   :bind ("C-c w" . imalison:ace-window))
 #+END_SRC
@@ -2097,7 +2105,8 @@ This was stolen from https://github.com/jwiegley/dot-emacs
       (interactive)
       (multi-line-execute multi-line-fill-stragety nil))
 
-    (imalison:prefix-alternatives imalison:multi-line multi-line
+    (imalison:prefix-alternatives imalison:multi-line
+      multi-line
       multi-line-single-line
       imalison:multi-line-skip-fill
       imalison:multi-line-fill
@@ -2411,8 +2420,10 @@ Pyimport is disabled because it may be causing a performance problem.
                  ("C-c t" . imalison:gotest))
      :preface
      (progn
-       (imalison:prefix-alternatives
-        imalison:gotest go-test-current-test go-test-current-file)
+       (imalison:prefix-alternatives imalison:gotest
+         go-test-current-test
+         go-test-current-file)
+
        (defun imalison:add-expected-test-name-for-suite (suite-name test-name)
          (if (> (length suite-name) 0)
              (concat " -run Test" suite-name)
@@ -2832,7 +2843,8 @@ emr (emacs refactor) provides support for refactoring in many programming langua
                                      term-projectile-create-new-default-directory)
   :config
   (progn
-    (imalison:prefix-alternatives imalison:term term-projectile-forward
+    (imalison:prefix-alternatives imalison:term
+      term-projectile-forward
       term-projectile-create-new)
     (defhydra imalison:term-hydra-default-directory ()
       "term - default-directory"
@@ -2993,8 +3005,10 @@ I had to disable this mode because something that it does messes with coding set
   :bind (("C-\\" . imalison:company))
   :config
   (progn
-    (imalison:prefix-alternatives
-     imalison:company company-complete company-yasnippet)
+    (imalison:prefix-alternatives imalison:company
+      company-complete
+      company-yasnippet)
+
     (setq company-idle-delay .25)
     (global-company-mode)
     (diminish 'company-mode))