You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
66 lines
3.2 KiB
66 lines
3.2 KiB
(setq debug-on-error t) ;; Debug-Meldung, wenn Fehler bei init.el
|
|
|
|
(require 'package)
|
|
|
|
(defvar gnu '("gnu" . "https://elpa.gnu.org/packages/"))
|
|
(defvar melpa '("melpa" . "https://melpa.org/packages/"))
|
|
(defvar melpa-stable '("melpa-stable" . "https://stable.melpa.org/packages/"))
|
|
(defvar org '("org" . "http://orgmode.org/elpa/"))
|
|
;;(defvar elpy '("elpy" . "http://jorgenschaefer.github.io/packages/"))
|
|
|
|
(setq package-archive nil)
|
|
(add-to-list 'package-archives melpa-stable t)
|
|
(add-to-list 'package-archives melpa t)
|
|
(add-to-list 'package-archives gnu t)
|
|
(add-to-list 'package-archives org t)
|
|
|
|
(package-initialize) ;; Archiv initialisieren und Inhalt
|
|
;; aktualisieren, wenn kein Cache vorhanden
|
|
(unless (and (file-exists-p "~/.emacs.d/elpa/archives/melpa-stable")
|
|
(file-exists-p "~/.emacs.d/elpa/archives/melpa")
|
|
(file-exists-p "~/.emacs.d/elpa/archives/gnu")
|
|
(file-exists-p "~/.emacs.d/elpa/archives/org"))
|
|
(package-refresh-contents))
|
|
|
|
(unless (package-installed-p 'use-package)
|
|
(package-refresh-contents)
|
|
(package-install 'use-package))
|
|
|
|
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes") ;; Speicherpfad für Themes
|
|
|
|
(defvar PATH_START "~/Archiv/Dokumente/")
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Optik
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
(setq inhibit-startup-message t) ;; keine Startnachricht
|
|
(setq inhibit-splash-screen t) ;; kein Splashscreen
|
|
(setq initial-scratch-message nil) ;; keine Scratchmessage
|
|
(setq initial-buffer-choice PATH_START) ;; Dateibrowser öffnen
|
|
(add-to-list 'default-frame-alist '(fullscreen . maximized)) ;; Vollbild beim Start
|
|
|
|
(show-paren-mode 1) ;; zeigt zusammenhängende Klammern
|
|
(setq show-paren-delay 0) ;; zeigt die Klammern umgehend
|
|
|
|
(global-hl-line-mode 1) ;; Aktuelle Zeile hervorheben
|
|
(make-variable-buffer-local 'global-hl-line-mode) ;; deaktiviere Hervorhebung bei Bedarf
|
|
(global-linum-mode t) ;; Generell Zeilennummern anzeigen
|
|
(set-face-attribute 'default nil :font "Hack-12")
|
|
|
|
(setq scroll-step 1
|
|
scroll-conservatively 10000)
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; which-key
|
|
;; https://github.com/justbur/emacs-which-key
|
|
;; Info in Emacs: M-x customize-group which-key
|
|
|
|
;;(setq which-key-mode) ;; aktiviert which-key
|
|
;;(which-key-setup-side-window-right-bottom) ;; zeigt hotkeys rechts an, wenn Platz, sonst unten
|
|
;;(which-key-setup-minibuffer) ;; take over the minibuffer
|
|
;;(setq which-key-idle-delay 0.5) ;; hotkeys werden nach 0.5s angezeigt
|
|
|
|
|
|
(provide 'base)
|