(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)