X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/8845865d1537d50dd26cec61f181f39ff14e6928..c626c512d4420440410e22955c23cf0ea8b0d2b1:/el/dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 8aff2b9..5314fd9 100644
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -3513,9 +3513,7 @@ that character only to be normal punctuation.")
 (mdw-define-face eshell-ls-readonly (t nil))
 (mdw-define-face eshell-ls-symlink (t :foreground "cyan"))
 
-(defun mdw-eshell-hack ()
-  (when mdw-preload-hacks
-    (setenv "LD_PRELOAD" nil)))
+(defun mdw-eshell-hack () (setenv "LD_PRELOAD" nil))
 (add-hook 'eshell-mode-hook 'mdw-eshell-hack)
 
 ;;;--------------------------------------------------------------------------
@@ -3931,6 +3929,10 @@ This allows you to pass a list of arguments through `ansi-term'."
 			   magit-revision-mode-refresh-popup))
 	    (magit-define-popup-switch popup ?R "Reverse diff" "-R"))))
 
+(defadvice magit-wip-commit-buffer-file
+    (around mdw-just-this-buffer activate compile)
+  (let ((magit-save-repository-buffers nil)) ad-do-it))
+
 (setq magit-repolist-columns
       '(("Name" 16 magit-repolist-column-ident nil)
 	("Version" 18 magit-repolist-column-version nil)