40 lines
		
	
	
	
		
			1.2 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
		
		
			
		
	
	
			40 lines
		
	
	
	
		
			1.2 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
|  | ;; Persist command history | ||
|  | (savehist-mode 1) | ||
|  | 
 | ||
|  | ;; Disable the splash screen (to enable it agin, replace the t with 0). | ||
|  | (setq inhibit-splash-screen t) | ||
|  | 
 | ||
|  | ;; Disable the menu. | ||
|  | (tool-bar-mode -1) | ||
|  | ;; Enable transient mark mode. | ||
|  | (transient-mark-mode 1) | ||
|  | 
 | ||
|  | ;; Highlight paired parentheses when cursor is over one. | ||
|  | (show-paren-mode 1) | ||
|  | 
 | ||
|  | ;;;; TAGS configuration. | ||
|  | ;; Goto tag with M-. | ||
|  | (global-set-key "\M-." 'etags-select-find-tag) | ||
|  | ;; Automatically load TAGS file (if exists) when opening emacs. | ||
|  | (let ((my-tags-file (locate-dominating-file default-directory "TAGS"))) | ||
|  |   (when my-tags-file | ||
|  |     (message "Loading tags file: %s" my-tags-file) | ||
|  |     (visit-tags-table my-tags-file))) | ||
|  | 
 | ||
|  | ;;(setq split-height-threshold nil) | ||
|  | ;;(setq split-width-threshold 0) | ||
|  | (global-set-key (kbd "S-C-h") 'shrink-window-horizontally) | ||
|  | (global-set-key (kbd "S-C-l") 'enlarge-window-horizontally) | ||
|  | (global-set-key (kbd "S-C-j") 'shrink-window) | ||
|  | (global-set-key (kbd "S-C-k") 'enlarge-window) | ||
|  | 
 | ||
|  | (setq-default display-line-numbers-type 'absolute | ||
|  |               display-line-numbers-current-absolute t | ||
|  |               display-line-numbers-width 4 | ||
|  |               display-line-numbers-widen t) | ||
|  | 
 | ||
|  | (add-hook 'text-mode-hook #'display-line-numbers-mode) | ||
|  | (add-hook 'prog-mode-hook #'display-line-numbers-mode) | ||
|  | 
 | ||
|  | (provide 'jenga-emacs) |