diff options
Diffstat (limited to 'suweren/home')
| -rw-r--r-- | suweren/home/emacs-configuration.el | 111 | ||||
| -rw-r--r-- | suweren/home/services.scm | 12 |
2 files changed, 123 insertions, 0 deletions
diff --git a/suweren/home/emacs-configuration.el b/suweren/home/emacs-configuration.el new file mode 100644 index 0000000..e4a1d70 --- /dev/null +++ b/suweren/home/emacs-configuration.el @@ -0,0 +1,111 @@ +;; Disable Backup Files +(setq make-backup-files nil) + +;;; https://github.com/fimblo/dot.emacs +;;; Theme Activation +(load-theme 'modus-vivendi) + +;;; Disable Org Indent Mode +(add-hook 'org-mode-hook (lambda () (org-indent-mode -1))) + +;;; Enable ParEdit +(add-hook 'prog-mode-hook 'enable-paredit-mode) + +;;; 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 "marek@marekpasnikowski.pl") + +(setq-default epg-gpg-program "gpg2") + +;;;https://github.com/redguardtoo/mastering-emacs-in-one-year-guide/blob/master/gnus-guide-en.org#my-gnusel +(setq-default send-mail-function 'smtpmail-send-it + smtpmail-stream-type 'ssl + smtpmail-smtp-server "marekpasnikowski.pl" + smtpmail-smtp-service 465 + ;; smtpmail-local-domain "izumi.lan" + smtpmail-debug-info t) + +(require 'smtpmail) + +;;; https://github.com/redguardtoo/mastering-emacs-in-one-year-guide/blob/master/gnus-guide-en.org#my-gnusel +(add-hook 'message-mode-hook + (lambda () + (flyspell-mode t) + (local-set-key (kbd "TAB") + 'bbdb-complete-name))) + +;;; Startup Screen Inhibition +(setq-default inhibit-startup-screen t) + +;; Enable the column-100 line +(setq-default display-fill-column-indicator-column 100 + fill-column 100 + org-startup-truncated nil) +(set-face-attribute 'fill-column-indicator nil :foreground "green") +(global-display-fill-column-indicator-mode) + +;;; Enable Org Modern Style + ;(with-eval-after-load 'org (global-org-modern-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-FC Configuration +(require 'org-fc-hydra) +(setq-default + org-fc-algorithm 'tn + org-fc-shuffle-positions t + org-fc-directories '("~/Dokumenty/fiszki")) + +;; Nix Mode +;; (require 'nix-mode) +;; (add-to-list 'auto-mode-alist '("\\.nix\\'" . nix-mode)) + +;; (setq tramp-remote-path +;; (append tramp-remote-path +;; '(tramp-own-remote-path +;; "~/.guix-profile/bin" +;; "~/.guix-profile/sbin" +;; "/run/current-system/profile/bin" +;; "/run/current-system/profile/sbin"))) diff --git a/suweren/home/services.scm b/suweren/home/services.scm index 46448c9..db2e0df 100644 --- a/suweren/home/services.scm +++ b/suweren/home/services.scm @@ -1,5 +1,7 @@ (define-module (suweren home services) + #:use-module (gnu home services) #:use-module (gnu home services shells) + #:use-module (gnu services) #:use-module (guix gexp)) (define-public suweren-home-bash-configuration @@ -9,3 +11,13 @@ "bash-profile")))) (home-bash-configuration (bashrc bashrc) (bash-profile bash-profile)))) + +(define-public suweren-home-xdg-configuration-files-extension + (let* ((emacs-init-file (local-file "emacs-configuration.el")) + + (emacs-init (list "emacs/init.el" emacs-init-file)) + + (value (list emacs-init))) + (simple-service 'suweren-home-xdg-configuration-files + home-xdg-configuration-files-service-type + value))) |