;; 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)

;; ORG-FC Configuration
(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")))