;; 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)