Merge branch 'master' of https://gitea.cloudsphere.duckdns.org/marc/config_emacs

create-init.sh

@@ -0,0 +1,11 @@
+#!/bin/sh
+rm ./init.el
+rm ./init.elc
+
+cat <<EOF >./init.el
+(require 'org)
+(find-file (concat user-emacs-directory "init.org"))
+(org-babel-tangle)
+(load-file (concat user-emacs-directory "init.el"))
+(byte-compile-file (concat user-emacs-directory "init.el"))
+EOF

init.org

@@ -36,6 +36,9 @@
 #+BEGIN_SRC emacs-lisp
 (require 'package)
 
+;; bug before emacs 26.3
+(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
+(add-to-list 'package-archives '("elpa" . "https://elpa.gnu.org/packages/") t)
 (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
 (add-to-list 'package-archives '("melpa-stable" . "https://stable.melpa.org/packages/") t)
 (add-to-list 'package-archives '("org" . "https://orgmode.org/elpa/") t)
@@ -50,8 +53,11 @@
 
   (setq use-package-verbose nil)
 
-  ;(eval-when-compile
-    (require 'use-package);)
+  (eval-when-compile
+    (require 'use-package))
+  (require 'bind-key)
+  (use-package diminish
+    :ensure t)
 #+END_SRC
 
 * Default settings
@@ -101,7 +107,7 @@
 * visuals
 ** Font
 #+BEGIN_SRC emacs-lisp
-(set-face-font 'default "Hack Nerd Font Mono-10")
+(set-face-font 'default "Hack-10")
 #+END_SRC
 
 ** line wrappings
@@ -133,13 +139,13 @@
 ** misc
 #+BEGIN_SRC emacs-lisp
   (use-package rainbow-mode
+    :ensure t
     :diminish
     :hook ((org-mode
             emacs-lisp-mode) . rainbow-mode))
 #+END_SRC
 * undo
 #+BEGIN_SRC emacs-lisp
-(require 'undo-tree)
 (use-package undo-tree
 :ensure t
 :diminish undo-tree-mode
@@ -165,7 +171,6 @@
 #+END_SRC
 * which-key
 #+BEGIN_SRC emacs-lisp
-  (require 'which-key)
   (use-package which-key
     :ensure t
     :diminish which-key-mode
@@ -230,7 +235,7 @@ END_SRC
 * ivy / counsel / swiper
 
 #+BEGIN_SRC emacs-lisp
-  (require 'ivy)
+;  (require 'ivy)
   (use-package ivy
     :ensure t
     :diminish
@@ -269,7 +274,7 @@ END_SRC
 * company
 
 #+BEGIN_SRC emacs-lisp
-  (require 'company)
+;  (require 'company)
   (use-package company
     :defer 1
     :bind
@@ -288,7 +293,7 @@ END_SRC
      company-show-numbers t
      company-tooltip-align-annotations t))
 
-  (require 'company-statistics)
+;  (require 'company-statistics)
   (use-package company-statistics
     :ensure t
     :after company
@@ -304,7 +309,7 @@ END_SRC
     (setq-default company-dabbrev-downcase nil))
 
   (use-package company-box
-    :ensure nil
+    :ensure t
     :init
     (add-hook 'company-mode-hook 'company-box-mode))
 #+END_SRC
@@ -381,6 +386,7 @@ TODO Unterverzeichnisse wurden noch nicht getestet
 
   (use-package lsp-ui
     :after lsp-mode
+    :ensure t
     :diminish
     :commands lsp-ui-mode
     :config
@@ -412,7 +418,7 @@ TODO Unterverzeichnisse wurden noch nicht getestet
 ** flycheck
 #+BEGIN_SRC emacs-lisp
   (use-package flycheck
-    ;;:ensure t
+    :ensure t
     :hook
     ((css-mode . flycheck-mode)
      (emacs-lisp-mode . flycheck-mode)
@@ -495,6 +501,7 @@ deactivate
 #+BEGIN_SRC emacs-lisp
   (use-package beancount
     :load-path "user-local/elisp"
+    :ensure t
     :defer t
     :mode
     ("\\.beancount$" . beancount-mode)