98 lines
2.7 KiB
EmacsLisp
98 lines
2.7 KiB
EmacsLisp
;; ~/.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")))
|