Formatting , automatic

lisp/mitch-packages.el

@@ -62,9 +62,9 @@
   :config
   (defun find-file-sudo (&rest throwaway)
     (if buffer-file-name
-      (unless (or (file-writable-p buffer-file-name)
+	(unless (or (file-writable-p buffer-file-name)
-		  (file-directory-p buffer-file-name))
+		    (file-directory-p buffer-file-name))
-	(find-alternate-file (format "/sudo::%s" buffer-file-name)))))
+	  (find-alternate-file (format "/sudo::%s" buffer-file-name)))))
   (advice-add #'find-file :after #'find-file-sudo))
 
 
@@ -90,10 +90,10 @@
     (interactive)
     (let ((filename (or filename
 			(concat "./"
-			     (file-relative-name
+				(file-relative-name
-			      (read-file-name (edraw-msg "Write svg file: ")
+				 (read-file-name (edraw-msg "Write svg file: ")
-					      default-directory)
+						 default-directory)
-			      default-directory)))))
+				 default-directory)))))
       (insert (format "[[edraw:file=%s]]" filename))
       (backward-char)
       (org-return))))
@@ -199,11 +199,11 @@
   :diminish
   :if (not (display-graphic-p))
   :custom
-  (evil-motion-state-cursor 'box)  ; █
+  (evil-motion-state-cursor 'box)	; █
-  (evil-visual-state-cursor 'box)  ; █
+  (evil-visual-state-cursor 'box)	; █
-  (evil-normal-state-cursor 'box)  ; █
+  (evil-normal-state-cursor 'box)	; █
-  (evil-insert-state-cursor 'bar)  ; ⎸
+  (evil-insert-state-cursor 'bar)	; ⎸
-  (evil-emacs-state-cursor  'hbar) ; _
+  (evil-emacs-state-cursor  'hbar)	; _
   :config
   (evil-terminal-cursor-changer-activate)
   (xterm-mouse-mode))