]> git.earman.xyz Git - emacsinit.git/commitdiff
Swapping (M-s .) and (M-s M-.). Adding xterm mouse support.
authorrearman <rearman@r717.net>
Wed, 2 Nov 2022 12:22:10 +0000 (08:22 -0400)
committerrearman <rearman@r717.net>
Wed, 2 Nov 2022 12:22:10 +0000 (08:22 -0400)
init.el

diff --git a/init.el b/init.el
index bd86fd3ea2de932e9ad3f0ad0e4574e7de7a4e54..e377d7445c46c97e890b6bd1e679301dcc0d512d 100644 (file)
--- a/init.el
+++ b/init.el
 (auto-fill-mode t)
 (show-paren-mode t)
 (column-number-mode t)
-(delete-selection-mode t)
+;;(delete-selection-mode t)
 (set-scroll-bar-mode 'left)
 (global-hl-line-mode t)
 (global-prettify-symbols-mode t)
 (global-display-line-numbers-mode t)
 
+(unless (display-graphic-p)
+  (xterm-mouse-mode 1))
+
 ;; HOOKS
 (add-hook 'after-init-hook 'visual-line-mode)
 (add-hook 'before-save-hook 'whitespace-cleanup)
 
 (setq-default indicate-empty-lines t
              cursor-type 'bar)
-;;           mode-line-format
-;;           (list
-;;            " " mode-line-modified
-;;            " %[" mode-line-buffer-identification "%] %l,%c %6 "
-;;            mode-line-misc-info
-;;            mode-line-end-spaces))
-
 
 ;; DEFUNS
 (defun goto-line-with-feedback ()
@@ -197,13 +193,15 @@ Can't go prev line first, edge case of beginning of buffer."
 (global-set-key (kbd "C-c h") 'global-hl-line-mode)
 (global-set-key (kbd "C-c n") 'display-line-numbers-mode)
 (global-set-key (kbd "C-c r") 'recentf-open-files)
-(global-set-key (kbd "C-c *") 'isearch-forward-thing-at-point) ;; vim-like helper for M-s M-.
+
 ;; OVERRIDES
 (global-set-key [remap goto-line] 'goto-line-with-feedback)
 (global-set-key (kbd "M-j") 'backward-join-line)
 (global-set-key (kbd "M-J") 'join-line)
 (global-set-key (kbd "C-o") 'open-line-below)
 (global-set-key (kbd "M-o") 'open-line-above)
+(global-set-key (kbd "M-s .") 'isearch-forward-thing-at-point)
+(global-set-key (kbd "M-s M-.") 'isearch-forward-symbol-at-point)
 (global-set-key (kbd "C-u") 'backward-kill-line)
 (global-set-key (kbd "C-w") 'kill-bword-or-region)
 (global-set-key (kbd "C-z") 'zap-up-to-char)