1 files changed, 78 insertions, 1 deletions
diff --git a/aisaka.org b/aisaka.org
index 552554b..a8703e5 100644
--- a/aisaka.org
+++ b/aisaka.org
@@ -240,7 +240,8 @@ https://guix.gnu.org/en/manual/devel/en/html_node/Home-Configuration.html
                      `((".config/git/config" ,(local-file "git.config"))
                        (".config/guix/shell-authorized-directories"
                         ,(local-file "guix-shell-authorized-directories"))
-                       (".emacs" ,(local-file "emacs.el")))))))
+                       (".emacs" ,(plain-file "emacs" "\
+  <<emacs-configuration>>\n")))))))
 #+end_src
 
 *** TODO bashrc
@@ -249,6 +250,82 @@ https://guix.gnu.org/en/manual/devel/en/html_node/Home-Configuration.html
   export LD_LIBRARY_PATH=$LIBRARY_PATH
 #+end_src
 
+*** TODO emacs
+
+#+begin_src elisp :noweb-ref emacs-configuration
+  ;;; Disable auto-backup
+  (setq-default make-backup-files nil)
+
+  ;;; https://github.com/fimblo/dot.emacs
+  ;;; Theme Activation
+  (load-theme 'manoj-dark)
+
+  ;;; https://elpa.gnu.org/packages/aggressive-indent.html
+  ;;; Automatic Activation of Aggressive Indent
+  (global-aggressive-indent-mode)
+
+  ;; Highlight the pair of delimiters under the cursor
+  (setq-default show-paren-mode 1
+                show-paren-delay 0)
+
+  ;;; https://guix.gnu.org/manual/en/html_node/The-Perfect-Setup.html
+  ;;; Copyright Information
+  (setq-default user-full-name \"Marek Paśnikowski\"
+                user-mail-address \"marekpasnikowski@protonmail.com\")
+
+  ;;; Startup Screen Inhibition
+  (setq-default inhibit-startup-screen t)
+
+  ;; Enable the column-80 line
+  (setq-default display-fill-column-indicator 1
+                display-fill-column-indicator-column 80)
+  (global-display-fill-column-indicator-mode)
+
+  ;; Prepare Literate Programming
+  (setq-default
+   org-startup-indented t
+   org-confirm-babel-evaluate nil
+   org-src-fontify-natively t
+   org-src-tab-acts-natively t)
+  (org-babel-do-load-languages 'org-babel-load-languages '((emacs-lisp . t)
+                                                           (scheme . t )
+                                                           (shell . t )))
+
+  (add-to-list 'auto-mode-alist '(\"\\.epub\\'\" . nov-mode))
+
+  ;; Monospace Font in Ebook Reader
+  (setq-default nov-variable-pitch nil)
+
+  ;; Disable Toolbar
+  (tool-bar-mode -1)
+
+  ;; GNUS Configuration
+  (setq-default gnus-auto-select-first nil
+                gnus-select-method '(nnnil \"\")
+                gnus-secondary-select-methods '((nnimap \"outlook\"
+                                                        (nnimap-address \"outlook.office365.com\")
+                                                        (nnimap-server-port 993)
+                                                        (nnimap-stream ssl)
+                                                        (nnimap-authinfo-file \"~/.authinfo\"))
+                                                (nnimap \"home\"
+                                                        (nnimap-address \"serwer1930490.home.pl\")
+                                                        (nnimap-server-port 993)
+                                                        (nnimap-stream ssl)
+                                                        (nnimap-authinfo-file \"~/.authinfo\")))
+                nnmail-split-method 'nnmail-split-fancy
+                nnmail-split-fancy '(| \"normal\"))
+  (add-hook 'gnus-group-mode-hook 'gnus-topic-mode)
+
+  ;; Org Configuration
+  (setq-default org-contacts-files '(\"~/Dokumenty/UWM/filia w Ełku/Samorząd 2022/starostowie.org\"))
+
+  ;; ORG-FC Configuration
+  (require 'org-fc-hydra)
+  (setq-default
+   org-fc-algorithm 'tn
+   org-fc-directories '(\"~/Dokumenty/fiszki\"))
+#+end_src
+
 * TODO LIBREBOOT
 
 The first layer of computing is the firmware.  The Lenovo Thinkpad X200 has