From 322fe756766033d0f3175d75c48765153442f39e Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Tue, 7 Feb 2023 21:18:09 +0100 Subject: Integrate the emacs.el file --- aisaka.org | 79 +++++++++++++++++++++++++++++++++++++++++++++++++- emacs.el | 71 --------------------------------------------- home-configuration.scm | 73 +++++++++++++++++++++++++++++++++++++++++++++- 3 files changed, 150 insertions(+), 73 deletions(-) delete mode 100644 emacs.el 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" "\ + <>\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 diff --git a/emacs.el b/emacs.el deleted file mode 100644 index 7f1a1cd..0000000 --- a/emacs.el +++ /dev/null @@ -1,71 +0,0 @@ -;;; 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")) diff --git a/home-configuration.scm b/home-configuration.scm index e436135..2fee4fc 100644 --- a/home-configuration.scm +++ b/home-configuration.scm @@ -168,4 +168,75 @@ `((".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" "\ +;;; 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\"))\n"))))))) -- cgit v1.2.3