301 |
301 |
302 ;; show column & line numbers in status bar |
302 ;; show column & line numbers in status bar |
303 (setq column-number-mode t) |
303 (setq column-number-mode t) |
304 (setq line-number-mode t) |
304 (setq line-number-mode t) |
305 (setq size-indication-mode t) |
305 (setq size-indication-mode t) |
|
306 (setq line-number-display-limit large-file-warning-threshold) |
|
307 (setq line-number-display-limit-width 200) |
306 ;; (linum-mode 1) |
308 ;; (linum-mode 1) |
307 |
309 |
308 ;; Also useful such format: (setq display-time-format " %H:%M %d-%m-%y ") |
310 ;; Also useful such format: (setq display-time-format " %H:%M %d-%m-%y ") |
309 (setq display-time-24hr-format t) |
311 (setq display-time-24hr-format t) |
310 (setq display-time-day-and-date nil) |
312 (setq display-time-day-and-date nil) |
902 (global-set-key "\C-x\C-b" 'ibuffer) |
904 (global-set-key "\C-x\C-b" 'ibuffer) |
903 (global-set-key [s-insert] 'ibuffer) |
905 (global-set-key [s-insert] 'ibuffer) |
904 |
906 |
905 (icomplete-mode 1) |
907 (icomplete-mode 1) |
906 (setq icomplete-with-completion-tables t) |
908 (setq icomplete-with-completion-tables t) |
|
909 |
|
910 (defun my--is-file-large () |
|
911 "If buffer too large and my cause performance issue." |
|
912 (< large-file-warning-threshold (buffer-size))) |
|
913 |
|
914 (define-derived-mode my-large-file-mode fundamental-mode "LargeFile" |
|
915 "Fixes performance issues in Emacs for large files." |
|
916 ;; (setq buffer-read-only t) |
|
917 (setq bidi-display-reordering nil) |
|
918 (jit-lock-mode nil) |
|
919 (buffer-disable-undo) |
|
920 ;; (make-variable-buffer-local 'mode-line-format) |
|
921 ;; (setq mode-line-format (delq 'mode-line-position 'mode-line-format)) |
|
922 (set (make-variable-buffer-local 'global-hl-line-mode) nil) |
|
923 (set (make-variable-buffer-local 'line-number-mode) nil) |
|
924 (set (make-variable-buffer-local 'column-number-mode) nil) ) |
|
925 |
|
926 (add-to-list 'magic-mode-alist (cons #'my--is-file-large #'my-large-file-mode)) |
907 |
927 |
908 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
928 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
909 (message "completion") |
929 (message "completion") |
910 |
930 |
911 ;; I remove partial-completion-mode because it depricated in Emacs 24.0. |
931 ;; I remove partial-completion-mode because it depricated in Emacs 24.0. |