Various minor improvements

bin/clipboard-manager.sh

@@ -2,7 +2,7 @@
 
 old_clipboard_content=$(xclip -sel clip -o | sed 's/[\"]/\\&/g')
 
-while sleep 2; do
+while sleep 0.5; do
     new_clipboard_content=$(xclip -sel clip -o | sed 's/[\"]/\\&/g')
     if [ "${old_clipboard_content}" != "${new_clipboard_content}" ]; then
         emacsclient -e "(kill-new \"${new_clipboard_content}\")"

hosts/blueberry/init-exwm.el

@@ -17,7 +17,7 @@
   "Start a clipboard manager, performing `kill-new' from xclip."
   (interactive)
   (start-process-shell-command "clipboard-manager"
-			       nil
+			       nil ;; We don't want all cuts to be logged
 			       (locate-user-emacs-file "bin/clipboard-manager.sh")))
 
 ;; Watch smartcard to lock the screen
@@ -114,12 +114,16 @@ Append OUTPUT to the PROCESS buffer, and lock the screen when there is output."
     ([?\M-v] . prior)
     ([?\C-v] . next)
     ([?\C-d] . delete)
-    ([?\C-k] . (S-end delete))
+    ([?\C-k] . (S-end ?\C-x))
+    ([?\M-<] . C-home)
+    ([?\M->] . C-end)
     ;; cut/paste, selection
     ([?\C-w] . ?\C-x)
     ([?\M-w] . ?\C-c)
     ([?\C-y] . ?\C-v)
     ([?\C-x ?h] . ?\C-a)
+    ([?\M-d] . (C-S-right ?\C-x))
+    ([M-backspace] . (C-S-left ?\C-x))
     ;; search
     ([?\C-s] . ?\C-f)
     ;; escape

init.el

@@ -106,7 +106,8 @@
         auto-revert-verbose nil))
 
 (use-package avy
-  :bind ("C-c C-j" . avy-goto-char-2)
+  :bind (("C-c C-j" . avy-goto-char-2)
+         ("M-g g" . avy-goto-line))
   :config
   (progn
      ;; Home row