added lexical binding, some cleanup

init.org

@@ -25,6 +25,11 @@
   - beancount configuration from config.org
   - CONTINUE TODO from config.org at Programming
 
+* Header
+Emacs variables are dynamically scoped. That's unusual for most languages, so disable it here, too
+#+begin_src emacs-lisp
+;;; init.el --- -*- lexical-binding: t -*-
+#+end_src
 * First start
   When pulling the repository the first time, an initial init.el needs to be setup. After start it will replace itself with the configuration from init.org
 
@@ -323,44 +328,41 @@ Windows Theme:
 * company
 
 #+BEGIN_SRC emacs-lisp
-;  (require 'company)
-  (use-package company
-    :defer 1
-    :bind
-    (:map company-active-map
-	  ("RET" . nil)
-	  ([return] . nil)
-	  ("TAB" . company-complete-selection)
-	  ([tab] . company-complete-selection)
-	  ("<right>" . company-complete-common))
-    :config
-    (global-company-mode 1)
-    (setq-default
-     company-idle-delay .2
-     company-minimum-prefix-length 1
-     company-require-match nil
-     company-show-numbers t
-     company-tooltip-align-annotations t))
-
-;  (require 'company-statistics)
-  (use-package company-statistics
-    :ensure t
-    :after company
-    :init
-    (setq company-statistics-file (concat MY--PATH_USER_LOCAL "company-statistics-cache.el"));~/.emacs.d/user-dir/company-statistics-cache.el")
-    :config
-    (company-statistics-mode 1))
+(use-package company
+  :defer 1
+  :bind
+  (:map company-active-map
+        ("RET" . nil)
+	([return] . nil)
+	("TAB" . company-complete-selection)
+	([tab] . company-complete-selection)
+	("<right>" . company-complete-common))
+  :config
+  (setq company-idle-delay .2
+        company-minimum-prefix-length 1
+        company-require-match nil
+        company-show-numbers t
+        company-tooltip-align-annotations t)
+  (global-company-mode 1))
+
+(use-package company-statistics
+  :ensure t
+  :after company
+  :init
+  (setq company-statistics-file (concat MY--PATH_USER_LOCAL "company-statistics-cache.el"));~/.emacs.d/user-dir/company-statistics-cache.el")
+  :config
+  (company-statistics-mode 1))
 
-  (use-package company-dabbrev
-    :ensure nil
-    :after company
-    :config
-    (setq-default company-dabbrev-downcase nil))
+(use-package company-dabbrev
+  :ensure nil
+  :after company
+  :config
+  (setq-default company-dabbrev-downcase nil))
 
-  (use-package company-box
-    :ensure t
-    :init
-    (add-hook 'company-mode-hook 'company-box-mode))
+(use-package company-box
+  :ensure t
+  :init
+  (add-hook 'company-mode-hook 'company-box-mode))
 #+END_SRC
 
 ** company backends