move flake to own repository

programs/emacs/custom.el

@@ -0,0 +1,45 @@
+(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.
+ '(browse-url-browser-function 'browse-url-firefox)
+ '(custom-safe-themes
+   '("7ec8fd456c0c117c99e3a3b16aaf09ed3fb91879f6601b1ea0eeaee9c6def5d9"
+     "badd1a5e20bd0c29f4fe863f3b480992c65ef1fa63951f59aa5d6b129a3f9c4c"
+     "2e05569868dc11a52b08926b4c1a27da77580daa9321773d92822f7a639956ce"
+     default))
+ '(org-agenda-files '("/home/swarsel/Calendars/leon_cal.org"))
+ '(send-mail-function 'sendmail-send-it)
+ '(warning-suppress-log-types
+   '(((python python-shell-completion-native-turn-on-maybe)) (comp)
+     ((defvaralias losing-value org-tab-first-hook))))
+ '(warning-suppress-types '(((defvaralias losing-value org-tab-first-hook)))))
+;; (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.
+;;  '(evil-goggles-change-face ((t (:inherit diff-removed))))
+;;  '(evil-goggles-delete-face ((t (:inherit diff-removed))))
+;;  '(evil-goggles-paste-face ((t (:inherit diff-added))))
+;;  '(evil-goggles-undo-redo-add-face ((t (:inherit diff-added))))
+;;  '(evil-goggles-undo-redo-change-face ((t (:inherit diff-changed))))
+;;  '(evil-goggles-undo-redo-remove-face ((t (:inherit diff-removed))))
+;;  '(evil-goggles-yank-face ((t (:inherit diff-changed))))
+;;  '(flycheck-posframe-border-face ((t (:foreground "darkgrey"))))
+;;  '(ivy-current-match ((t (:extend t :background "dark cyan" :foreground "black"))))
+;;  '(org-block ((t (:inherit fixed-pitch :extend t :background "#20282F"))))
+;;  '(org-block-begin-line ((t (:inherit org-block :extend t :background "#20282F" :foreground "DeepSkyBlue4" :weight bold)))))
+(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.
+ '(evil-goggles-change-face ((t (:inherit diff-removed))))
+ '(evil-goggles-delete-face ((t (:inherit diff-removed))))
+ '(evil-goggles-paste-face ((t (:inherit diff-added))))
+ '(evil-goggles-undo-redo-add-face ((t (:inherit diff-added))))
+ '(evil-goggles-undo-redo-change-face ((t (:inherit diff-changed))))
+ '(evil-goggles-undo-redo-remove-face ((t (:inherit diff-removed))))
+ '(evil-goggles-yank-face ((t (:inherit diff-changed)))))

programs/emacs/early-init.el

@@ -0,0 +1,39 @@
+(setq gc-cons-threshold most-positive-fixnum
+      gc-cons-percentage 0.6)
+
+(tool-bar-mode 0)
+(menu-bar-mode 0)
+(scroll-bar-mode 0)
+
+(setq frame-inhibit-implied-resize t)
+
+ (setq default-frame-alist
+        (append
+         (list
+          '(undecorated . t)
+          '(min-height . 1)
+          '(height     . 42)
+          '(min-width  . 1)
+          '(width      . 100)
+          '(vertical-scroll-bars . nil)
+          '(internal-border-width . 10)
+          '(tool-bar-lines . 0)
+          '(menu-bar-lines . 0))))
+
+ (setq-default left-margin-width 1
+                right-margin-width 1)
+
+ (add-hook
+   'after-make-frame-functions
+   (defun setup-blah-keys (frame)
+     (with-selected-frame frame
+       (when (display-graphic-p)
+         (define-key input-decode-map (kbd "C-i") [C-i])
+         (define-key input-decode-map (kbd "C-[") [C-lsb])
+         (define-key input-decode-map (kbd "C-m") [C-m])
+         ))))
+
+(defun swarsel/last-buffer () (interactive) (switch-to-buffer nil))
+(global-set-key (kbd "<C-m>") #'swarsel/last-buffer)
+
+(setq comp-deferred-compilation nil)