Add vc-git-print-log-follow and apropos-do-all
This commit is contained in:
@@ -90,16 +90,16 @@ When set to non-nil, Emacs will automatically call `package-initialize' and
|
||||
|
||||
(unless (daemonp)
|
||||
(let ((old-value (default-toplevel-value 'file-name-handler-alist)))
|
||||
(set-default-toplevel-value
|
||||
'file-name-handler-alist
|
||||
;; Determine the state of bundled libraries using calc-loaddefs.el.
|
||||
;; If compressed, retain the gzip handler in `file-name-handler-alist`.
|
||||
;; If compiled or neither, omit the gzip handler during startup for
|
||||
;; improved startup and package load time.
|
||||
(if (eval-when-compile
|
||||
(locate-file-internal "calc-loaddefs.el" load-path))
|
||||
nil
|
||||
(list (rassq 'jka-compr-handler old-value))))
|
||||
;; Determine the state of bundled libraries using calc-loaddefs.el.
|
||||
;; If compressed, retain the gzip handler in `file-name-handler-alist`.
|
||||
;; If compiled or neither, omit the gzip handler during startup for
|
||||
;; improved startup and package load time.
|
||||
(set-default-toplevel-value 'file-name-handler-alist
|
||||
(if (eval-when-compile
|
||||
(locate-file-internal "calc-loaddefs.el"
|
||||
load-path))
|
||||
nil
|
||||
(list (rassq 'jka-compr-handler old-value))))
|
||||
;; Ensure the new value persists through any current let-binding.
|
||||
(put 'file-name-handler-alist 'initial-value old-value)
|
||||
;; Emacs processes command-line files very early in startup. These files may
|
||||
@@ -146,9 +146,8 @@ When set to non-nil, Emacs will automatically call `package-initialize' and
|
||||
(defun minimal-emacs--startup-load-user-init-file (fn &rest args)
|
||||
"Advice for startup--load-user-init-file to reset mode-line-format."
|
||||
(unwind-protect
|
||||
(progn
|
||||
;; Start up as normal
|
||||
(apply fn args))
|
||||
;; Start up as normal
|
||||
(apply fn args)
|
||||
;; If we don't undo inhibit-{message, redisplay} and there's an
|
||||
;; error, we'll see nothing but a blank Emacs frame.
|
||||
(setq-default inhibit-message nil)
|
||||
|
||||
10
init.el
10
init.el
@@ -166,6 +166,10 @@
|
||||
(setq version-control t) ; Use version numbers for backup files
|
||||
(setq kept-new-versions 5)
|
||||
(setq kept-old-versions 5)
|
||||
|
||||
;;; VC
|
||||
|
||||
(setq vc-git-print-log-follow t)
|
||||
(setq vc-make-backup-files nil) ; Do not backup version controlled files
|
||||
|
||||
;;; Auto save
|
||||
@@ -401,6 +405,12 @@
|
||||
(setq ediff-window-setup-function #'ediff-setup-windows-plain
|
||||
ediff-split-window-function #'split-window-horizontally)
|
||||
|
||||
;;; Help
|
||||
|
||||
;; Enhance `apropos' and related functions to perform more extensive searches,
|
||||
;; increasing their usefulness.
|
||||
(setq apropos-do-all t)
|
||||
|
||||
;;; Load post-init.el
|
||||
(minimal-emacs-load-user-init "post-init.el")
|
||||
|
||||
|
||||
Reference in New Issue
Block a user