From 485783b9ef84739ab93780bd7ed115c9b75f7136 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Tue, 14 Mar 2017 22:46:44 +0100
Subject: Emacs: Fix byte-compilation warnings

---
 tag-emacs/emacs.d/init.org | 29 ++++++++++++-----------------
 1 file changed, 12 insertions(+), 17 deletions(-)

diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org
index 9c65d9f..b658107 100644
--- a/tag-emacs/emacs.d/init.org
+++ b/tag-emacs/emacs.d/init.org
@@ -13,9 +13,9 @@ Open Emacs with just a plain window.  No graphics or messages, please!
      (setq inhibit-startup-echo-area-message (user-login-name)))
 (setq inhibit-startup-screen t)
 (setq gc-cons-threshold 100000000)
-(setq file-name-handler-alist-backup file-name-handler-alist
-      file-name-handler-alist nil)
-(remove-hook 'find-file-hooks #'vc-find-file-hook)
+(defvar file-name-handler-alist-backup file-name-handler-alist)
+(setq file-name-handler-alist nil)
+(remove-hook 'find-file-hooks #'vc-refresh-state)
 #+END_SRC
 
 ** Scratch buffers
@@ -144,7 +144,7 @@ Let’s try a basic theme.
             (set-face-foreground 'window-divider "#a1b56c")
 
             (defvar mode-line-default-format mode-line-format)
-            (defcustom mode-line-default-hidden nil
+            (defvar mode-line-default-hidden nil
               "Whether to hide the mode line by default")
 
             (defun show-mode-line ()
@@ -501,7 +501,6 @@ based upon some folder conventions I use.
               (ap/open-subfolder-project home-project-directory arg))
 
             (setq projectile-switch-project-action #'projectile-commander
-                  projectile-remember-window-configs t
                   projectile-completion-system 'ivy)))
 #+END_SRC
 
@@ -516,7 +515,7 @@ occasions that I’m working with something other than git.
   :bind (("C-x v C" . vc-resolve-conflicts))
   :config (progn
             (setq vc-follow-symlinks t)
-            (setq vs-ignore-dir-regexp (format "\\(%s\\)\\|\\(%s\\)"
+            (setq vc-ignore-dir-regexp (format "\\(%s\\)\\|\\(%s\\)"
                                                vc-ignore-dir-regexp
                                                tramp-file-name-regexp))))
 #+END_SRC
@@ -546,10 +545,8 @@ time.  Make sure to set it up with a nice =completing-read-function=
 (use-package magit
   :defer 5
   :commands (magit-status)
-  :config (progn (setq magit-last-seen-setup-instructions "1.4.0"
-                       magit-completing-read-function #'ivy-completing-read
+  :config (progn (setq magit-completing-read-function #'ivy-completing-read
                        magit-popup-use-prefix-argument 'default
-                       magit-push-always-verify nil
                        magit-display-buffer-function #'magit-display-buffer-fullcolumn-most-v1
                        global-magit-file-mode nil)
                  (add-to-list 'magit-no-confirm 'safe-with-wip))
@@ -899,9 +896,9 @@ Undo, for window-based commands.
 
 #+BEGIN_SRC emacs-lisp
 (use-package winner
+  :config (setq winner-boring-buffers '("*Completions*" "*Help*" "*Apropos*" "*Buffer List*" "*info*" "*Compile-Log*"))
   :init (progn
-          (winner-mode 1)
-          (setq winner-boring-buffers '("*Completions*" "*Help*" "*Apropos*" "*Buffer List*" "*info*" "*Compile-Log*"))))
+          (winner-mode 1)))
 #+END_SRC
 
 ** windmove
@@ -976,9 +973,7 @@ Weeks start on Monday for me and I prefer ISO-style dates.
   :defer 1
   :config (progn
             (setq calendar-week-start-day 1)
-            (calendar-set-date-style 'iso)
-            (setq calendar-latitude 52.52
-                  calendar-longitude 13.40)))
+            (calendar-set-date-style 'iso)))
 #+END_SRC
 
 Sometimes I want to insert a date or time into a buffer.
@@ -1025,8 +1020,7 @@ copying/moving files between them.
             (setq dired-dwim-target t
                   dired-recursive-copies 'top
                   dired-recursive-deletes 'top
-                  dired-listing-switches "-alh"
-                  dired-bind-jump nil)
+                  dired-listing-switches "-alh")
             (when (and (eq system-type 'darwin) (executable-find "gls"))
               (setq insert-directory-program (executable-find "gls")))
             (put 'dired-find-alternate-file 'disabled nil)))
@@ -1046,7 +1040,8 @@ Don’t show uninteresting files in dired listings.
   :config (progn
             (setq dired-omit-files "#\\|\\.$"
                   dired-omit-verbose nil
-                  dired-find-subdir t))
+                  dired-find-subdir t
+                  dired-bind-jump nil))
   :init (progn
           (add-hook 'dired-mode-hook #'turn-on-dired-omit-mode)))
 #+END_SRC
-- 
cgit 1.4.1