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.
 

67 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
(scroll-bar-mode -1) ;; keine Scrollbar
(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)