| @@ -244,6 +244,12 @@ found, otherwise returns nil." | |||||
| ;; load init file when terminating emacs to ensure file is not broken | ;; load init file when terminating emacs to ensure file is not broken | ||||
| 'reload-init-file) | 'reload-init-file) | ||||
| (defun my-force-kill-emacs () | |||||
| "My force kill emacs." | |||||
| (interactive) | |||||
| (let ((kill-emacs-hook nil)) | |||||
| (kill-emacs))) | |||||
| (add-hook 'after-init-hook | (add-hook 'after-init-hook | ||||
| (lambda () | (lambda () | ||||
| (message "%s %s" invocation-name emacs-version) | (message "%s %s" invocation-name emacs-version) | ||||
| @@ -932,12 +938,14 @@ found, otherwise returns nil." | |||||
| t) | t) | ||||
| (lazy-load-eval 'git-command | (lazy-load-eval 'git-command | ||||
| nil | nil | ||||
| (add-to-list 'git-command-major-mode-alist | |||||
| '("di" . diff-mode)) | |||||
| (add-to-list 'git-command-major-mode-alist | |||||
| '("graph" . fundamental-mode)) | |||||
| (add-to-list 'git-command-major-mode-alist | |||||
| '("log" . fundamental-mode)) | |||||
| (if (boundp 'git-command-major-mode-alist) | |||||
| (progn | |||||
| (add-to-list 'git-command-major-mode-alist | |||||
| '("di" . diff-mode)) | |||||
| (add-to-list 'git-command-major-mode-alist | |||||
| '("graph" . fundamental-mode)) | |||||
| (add-to-list 'git-command-major-mode-alist | |||||
| '("log" . fundamental-mode)))) | |||||
| (or git-command-prompt-file | (or git-command-prompt-file | ||||
| (setq git-command-prompt-file | (setq git-command-prompt-file | ||||
| (git-command-find-git-ps1 | (git-command-find-git-ps1 | ||||
| @@ -969,11 +977,11 @@ found, otherwise returns nil." | |||||
| (setq diff-switches "-u") | (setq diff-switches "-u") | ||||
| (add-hook 'diff-mode-hook | (add-hook 'diff-mode-hook | ||||
| (lambda () | (lambda () | ||||
| (when (and (eq major-mode | |||||
| 'diff-mode) | |||||
| (not buffer-file-name)) | |||||
| ;; do not pass when major-mode is derived mode of diff-mode | |||||
| (view-mode 1)) | |||||
| ;; (when (and (eq major-mode | |||||
| ;; 'diff-mode) | |||||
| ;; (not buffer-file-name)) | |||||
| ;; ;; do not pass when major-mode is derived mode of diff-mode | |||||
| ;; (view-mode 1)) | |||||
| (set-face-attribute 'diff-header nil | (set-face-attribute 'diff-header nil | ||||
| :foreground nil | :foreground nil | ||||
| :background nil | :background nil | ||||