From 10b9983323796413d0c72e4c9f64cbe3652d9f1b Mon Sep 17 00:00:00 2001 From: Thomas Ulmer Date: Tue, 2 Dec 2025 21:04:23 -0800 Subject: viper off by default, fbterm support, singleheader --- emacs/init.el | 8 +++++--- emacs/site-lisp/single-header.el | 2 ++ 2 files changed, 7 insertions(+), 3 deletions(-) diff --git a/emacs/init.el b/emacs/init.el index 696a752..13dba00 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -626,7 +626,8 @@ given keymap or in the global keymap." (setq-default viper-ex-style-motion nil) (setq-default viper-auto-indent t) (setq-default viper-buffer-search-char ?g) - (setq viper-mode t) + ;; (setq viper-mode t) + (setq viper-mode nil) (require 'viper) (define-key viper-vi-global-user-map (kbd "C-y") 'yank) (define-key viper-vi-global-user-map (kbd "C-e") 'end-of-line) @@ -634,7 +635,8 @@ given keymap or in the global keymap." (define-key viper-vi-global-user-map (kbd "C-b") 'backward-char) (define-key viper-vi-global-user-map (kbd "C-u") 'universal-argument) (define-key viper-insert-global-user-map (kbd "C-u") 'universal-argument) - (define-key viper-insert-global-user-map (kbd "") + (define-key viper-insert-global-user-map (kbd "C-d") 'delete-char) + (define-key viper-insert-global-user-map (kbd "C-m") #'(lambda () (interactive) (if completion-in-region-mode @@ -830,7 +832,7 @@ changes." ([?\M-D] . my/dmenu) ([?\M-E] . my/browser) - ([M-return] . my/eshell) + (,(kbd "M-C-m") . my/eshell) ([?\M-K] . kill-current-buffer) ,@(mapcar (lambda (n) diff --git a/emacs/site-lisp/single-header.el b/emacs/site-lisp/single-header.el index c5cab2b..9d5086b 100755 --- a/emacs/site-lisp/single-header.el +++ b/emacs/site-lisp/single-header.el @@ -244,6 +244,8 @@ arg, dismiss all the notifications." :group 'single-header :global t :init-value nil + :keymap `((,(kbd "M-L d") . single-header-dismiss) + (,(kbd "M-L t") . single-header-mode)) :interactive t (if (not single-header-mode) (single-header-delete) -- cgit v1.2.3