From 5301833eaced40b8f7a64a04f222aa1d5986c481 Mon Sep 17 00:00:00 2001 From: tslil clingman <> Date: Tue, 9 Aug 2022 08:16:16 +0200 Subject: work inits --- emacs/work_inits/70-global-keybinds.el | 49 ++++++++++++++++++++++++++++++++++ 1 file changed, 49 insertions(+) create mode 100644 emacs/work_inits/70-global-keybinds.el (limited to 'emacs/work_inits/70-global-keybinds.el') diff --git a/emacs/work_inits/70-global-keybinds.el b/emacs/work_inits/70-global-keybinds.el new file mode 100644 index 0000000..816998f --- /dev/null +++ b/emacs/work_inits/70-global-keybinds.el @@ -0,0 +1,49 @@ +;; Time-stamp: <2020-10-26 17h12 EDT (hobbies)> + +(setq time-stamp-active t + time-stamp-line-limit 3 + time-stamp-format "%Y-%02m-%02d %02Hh%02M %Z (%s)") + +(add-hook 'before-save-hook #'time-stamp) + +(defun insert-timestamp () + (interactive) + (save-excursion + (goto-char (point-min)) + (unless (search-forward "Time-stamp: " + (line-beginning-position (1+ time-stamp-line-limit)) + t) + (goto-char (point-min)) + (newline) + (beginning-of-line 0) + (comment-dwim nil) + (insert (concat "Time-stamp: " "<>")) + (newline)) + (time-stamp))) +(global-set-key (kbd "C-x t") 'insert-timestamp) + +(global-set-key (kbd "C-z") 'nil) + +(use-package eterm-256color + :ensure t + :config + (add-hook 'term-mode-hook #'eterm-256color-mode) + (global-set-key (kbd "C-c c") 'ansi-term)) + +(global-set-key (kbd "C-x e") 'eval-expression) + +(global-set-key (kbd "M-i") 'indent-region) + +(global-set-key (kbd "C-v") 'delete-indentation) + +;; ----------------------------------------------------------------------------- +;; Killing +(global-set-key (kbd "C-c C-k") 'kill-whole-line) +(global-set-key (kbd "M-z") 'zap-up-to-char) + +(defun kill-region-or-backward-kill-word (arg) + (interactive "p") + (if (region-active-p) (kill-region 0 0 t) + (backward-kill-word arg))) + +(global-set-key (kbd "C-w") 'kill-region-or-backward-kill-word) -- cgit v1.2.3