;; ~/.emacs.d/init.el

;; (add-to-list 'load-path "~/.emacs.d/lisp")

;; (setq custom-file "~/.emacs.d/custom.el")
;; (load custom-file 'noerror 'nomessage)

;; (require 'init-packages)
;; (require 'init-ui)
;; (require 'init-org)
;; (require 'init-markdown)





;;; Package-System (optional, aber sinnvoll)
(require 'package)
(setq package-archives
      '(("gnu"   . "https://elpa.gnu.org/packages/")
        ("nongnu". "https://elpa.nongnu.org/nongnu/")
        ("melpa" . "https://melpa.org/packages/")))
(package-initialize)

(require 'doom-themes)
(load-theme 'doom-badger t)
(setq select-enable-clipboard t)
(setq select-enable-primary t)
;;(load-theme 'nord t)

;; Hintergrund dunkler / neutraler
(set-face-background 'default "#1e1e1e")
(set-face-background 'fringe "#1e1e1e")
(set-face-background 'region "#3a3a3a")

(menu-bar-mode -1)
(tool-bar-mode -1)
(scroll-bar-mode -1)
(electric-pair-mode 1)
(xterm-mouse-mode 1)


;;; Kleines, ruhiges UI
(setq inhibit-startup-screen t)
(setq initial-scratch-message nil)

;;; Besseres Schreib-Layout
(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)
(add-hook 'org-mode-hook #'my/text-indentation-setup)

;;; Org: echte Einrückung unter Überschriften
(setq org-adapt-indentation t)

(setq org-startup-indented t)
(add-hook 'org-mode-hook #'org-indent-mode)
(add-hook 'markdown-mode-hook #'outline-minor-mode)
(setq markdown-fontify-code-blocks-natively t)
(setq markdown-enable-math t)
(setq markdown-hide-markup t)


;;; Markdown-Einstellungen
(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(package-selected-packages '(doom-themes markdown-mode nord-theme olivetti)))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 )


(setq select-enable-clipboard t)

;; Wayland Clipboard Support via wl-copy / wl-paste
(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 ()
        (shell-command-to-string "wl-paste -n")))