initial commit

lisp/init-ui.el~

@@ -0,0 +1,53 @@
+(require 'subr-x)
+(require 'doom-themes)
+
+(load-theme 'doom-badger t)
+
+(setq inhibit-startup-screen t)
+(setq initial-scratch-message nil)
+
+(menu-bar-mode -1)
+(tool-bar-mode -1)
+(scroll-bar-mode -1)
+
+(electric-pair-mode 1)
+
+;; Maus im Terminal
+(unless (display-graphic-p)
+  (xterm-mouse-mode 1))
+
+;; Clipboard
+(setq select-enable-clipboard t)
+(setq select-enable-primary t)
+
+;; Wayland-Terminal Clipboard via wl-copy / wl-paste
+(unless (display-graphic-p)
+  (setq interprogram-cut-function
+        (lambda (text &optional _push)
+          (let ((process-connection-type nil))
+            (let ((proc (start-process "wl-copy" nil "wl-copy")))
+              (process-send-string proc text)
+              (process-send-eof proc)))))
+
+  (setq interprogram-paste-function
+        (lambda ()
+          (string-trim-right
+           (shell-command-to-string "wl-paste -n 2>/dev/null")))))
+
+;; Hintergrund etwas neutraler
+(set-face-background 'default "#1e1e1e")
+(set-face-background 'fringe "#1e1e1e")
+(set-face-background 'region "#3a3a3a")
+
+;; Schreiblayout für Textmodi
+(defun my/text-indentation-setup ()
+  "Angenehme Einrückung und Umbrüche für Text."
+  (setq-local left-margin-width 2)
+  (setq-local right-margin-width 0)
+  (visual-line-mode 1)
+  (setq-local word-wrap t)
+  (set-window-buffer nil (current-buffer)))
+
+(add-hook 'text-mode-hook #'my/text-indentation-setup)
+
+(provide 'init-ui)