;;; https://github.com/fimblo/dot.emacs
;;; Theme Activation
(load-theme 'misterioso)

(global-visual-line-mode t)

;;; 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 "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 t
	      fill-column 80)
(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 scroll-preserve-screen-position t
      scroll-conservatively 0
      maximum-scroll-margin 0.5
      scroll-margin 99999)

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

;;; MELPA
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
;; Comment/uncomment this line to enable MELPA Stable if desired.  See `package-archive-priorities`
;; and `package-pinned-packages`. Most users will not need or want to do this.
;;(add-to-list 'package-archives '("melpa-stable" . "https://stable.melpa.org/packages/") t)
(package-initialize)

;;; Emacs Tree Sitter
(require 'tree-sitter)
(require 'tree-sitter-langs)
(tree-sitter-require 'elisp)
(global-tree-sitter-mode)
(add-hook 'elisp-mode-hook #'tree-sitter-hl-mode)