Premikanje emacs konfiguracije v ORG
parent
02d82c10a4
commit
a7d51fbc40
File diff suppressed because it is too large
Load Diff
662
.emacs.d/init.el
662
.emacs.d/init.el
|
@ -1,622 +1,21 @@
|
||||||
;; Naloži konfiguracije iz ORG datoteke
|
;; Naloži konfiguracije iz ORG datoteke
|
||||||
(org-babel-load-file "~/.emacs.d/config.org")
|
(org-babel-load-file "~/.emacs.d/config.org")
|
||||||
|
|
||||||
;;;;;;;;;
|
|
||||||
;; GUI ;;
|
|
||||||
;;;;;;;;;
|
|
||||||
|
|
||||||
;; Menu bar off
|
|
||||||
(menu-bar-mode -1)
|
|
||||||
(tool-bar-mode -1)
|
|
||||||
|
|
||||||
;; Brez ikon zgoraj
|
|
||||||
(setq ns-use-proxy-icon nil)
|
|
||||||
(setq frame-title-format nil)
|
|
||||||
; Skrij scrollbar
|
|
||||||
(scroll-bar-mode -1)
|
|
||||||
;; Razmiki med okni
|
|
||||||
(setq window-divider-default-bottom-width 3)
|
|
||||||
(window-divider-mode t)
|
|
||||||
;; No dialog box plx
|
|
||||||
(setq use-dialog-box nil)
|
|
||||||
|
|
||||||
;; Barvna tema
|
|
||||||
(use-package gruvbox-theme
|
|
||||||
:config
|
|
||||||
(load-theme 'gruvbox-dark-soft t)
|
|
||||||
(window-divider-mode 0))
|
|
||||||
;(load-theme 'hemisu-light t) ;; hemisu-theme paket
|
|
||||||
;(require 'doom-themes)
|
|
||||||
;(setq doom-themes-enable-bold t ; if nil, bold is universally disabled
|
|
||||||
; doom-themes-enable-italic t) ; if nil, italics is universally disabled
|
|
||||||
;(load-theme 'doom-gruvbox t)
|
|
||||||
;(doom-themes-org-config)
|
|
||||||
|
|
||||||
;; Doom modeline - lepsi status bar spodaj
|
|
||||||
(use-package doom-modeline
|
|
||||||
:defer t
|
|
||||||
:init (doom-modeline-mode 1))
|
|
||||||
|
|
||||||
;; Lepse ikone!
|
|
||||||
(use-package nerd-icons)
|
|
||||||
|
|
||||||
;; !!! ;;
|
|
||||||
;; !!! Pognat je treba (1x) nerd-icons-install-fonts !!! ;;
|
|
||||||
;; !!! ;;
|
|
||||||
(use-package all-the-icons)
|
|
||||||
|
|
||||||
;; y/n namesto yes / no
|
|
||||||
(fset 'yes-or-no-p 'y-or-n-p)
|
|
||||||
|
|
||||||
;; Oooo gladko skrolanje! (Emacs 29+)
|
|
||||||
(pixel-scroll-precision-mode)
|
|
||||||
;; Nisem cist ziher kaj to dela
|
|
||||||
(setq scroll-conservatively 10)
|
|
||||||
(setq scroll-margin 8)
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;;;;;;;;;;;
|
|
||||||
;; TEKST ;;
|
|
||||||
;;;;;;;;;;;
|
|
||||||
|
|
||||||
;; Sirina taba ter spejsi kot distancniki
|
|
||||||
(setq-default tab-width 2)
|
|
||||||
(setq-default indent-tabs-mode nil)
|
|
||||||
|
|
||||||
;; Turn on the weird indenting that Emacs does by default.
|
|
||||||
(electric-indent-mode 1)
|
|
||||||
;; Turns on automatic parens pairing
|
|
||||||
(electric-pair-mode 1)
|
|
||||||
|
|
||||||
;; Editorconfig formatiranje fajlov
|
|
||||||
(use-package editorconfig
|
|
||||||
:config
|
|
||||||
(editorconfig-mode 1))
|
|
||||||
|
|
||||||
;; Text wrap na sirino oken
|
|
||||||
(global-visual-line-mode)
|
|
||||||
|
|
||||||
;; Stevilke vrstic
|
|
||||||
(global-display-line-numbers-mode)
|
|
||||||
|
|
||||||
;; Lepse file drevo
|
|
||||||
(use-package treemacs
|
|
||||||
:defer t
|
|
||||||
:general
|
|
||||||
(start/leader-keys
|
|
||||||
"t" 'treemacs)
|
|
||||||
:hook ((treemacs-mode . (lambda () ;; Brez stevilk vrstic v file drevesu!
|
|
||||||
(display-line-numbers-mode -1)))))
|
|
||||||
(use-package treemacs-projectile :after treemacs)
|
|
||||||
(use-package treemacs-evil :after treemacs)
|
|
||||||
|
|
||||||
;; Uporabi drevesne razveljavitve, undo tree
|
|
||||||
(use-package undo-tree
|
|
||||||
:config
|
|
||||||
(global-undo-tree-mode)
|
|
||||||
(evil-set-undo-system 'undo-tree)
|
|
||||||
;; Drevo razveljavitev shrani v emacsov folder
|
|
||||||
(setq undo-tree-history-directory-alist '(("." . "~/.emacs.d/undo"))))
|
|
||||||
|
|
||||||
;; Markdown podpora
|
|
||||||
(use-package markdown-mode :mode "\\.(md|markdown)\\'")
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;
|
|
||||||
;; PROGRAMIRANJE ;;
|
|
||||||
;;;;;;;;;;;;;;;;;;;
|
|
||||||
|
|
||||||
;; Projektni mgmt
|
|
||||||
(use-package projectile
|
|
||||||
; :defer t
|
|
||||||
:general
|
|
||||||
(start/leader-keys
|
|
||||||
"p" 'projectile-command-map)
|
|
||||||
:config
|
|
||||||
(setq projectile-globally-ignored-directories '("node_modules"))
|
|
||||||
(setq projectile-completion-system 'ivy)
|
|
||||||
|
|
||||||
;; Popravek za projectile prek ssh!
|
|
||||||
;(add-to-list 'tramp-remote-path 'tramp-own-remote-path)
|
|
||||||
;(setq-default projectile-indexing-method 'alien)
|
|
||||||
(setq projectile-indexing-method 'native)
|
|
||||||
(setq projectile-enable-caching t)
|
|
||||||
|
|
||||||
(projectile-mode t))
|
|
||||||
(use-package counsel-projectile :after projectile)
|
|
||||||
|
|
||||||
;; Zapiraj zaklepaje
|
|
||||||
(use-package smartparens
|
|
||||||
:defer t
|
|
||||||
:config
|
|
||||||
(smartparens-global-mode 1))
|
|
||||||
|
|
||||||
;; Pametni tabi
|
|
||||||
(use-package smart-tabs-mode
|
|
||||||
:disabled t
|
|
||||||
:after js2-mode
|
|
||||||
:config
|
|
||||||
;(smart-tabs-insinuate javascript scheme)
|
|
||||||
;; Pametni tabi za js2-mode
|
|
||||||
(smart-tabs-advice js2-indent-line js2-basic-offset))
|
|
||||||
|
|
||||||
;; Twig nacin (in drug web)
|
|
||||||
(use-package web-mode :mode "\\.(html|twig)\\'")
|
|
||||||
|
|
||||||
;; Lepšanje web kode
|
|
||||||
(use-package web-beautify :defer t :after web-mode)
|
|
||||||
|
|
||||||
;; Kompletiranje ukazov
|
|
||||||
(use-package company
|
|
||||||
:config
|
|
||||||
(setq lsp-completion-provider :capf)
|
|
||||||
(company-mode))
|
|
||||||
|
|
||||||
;; LSP potrebuje dependency iz npm: "sudo npm install -g vue-language-server
|
|
||||||
(use-package lsp-mode
|
|
||||||
:defer t
|
|
||||||
:config
|
|
||||||
;; Pospešimo
|
|
||||||
;; Make gc pauses faster by decreasing the threshold.
|
|
||||||
(setq gc-cons-threshold (* 100 1000 1000))
|
|
||||||
;; Increase the amount of data which Emacs reads from the process
|
|
||||||
(setq read-process-output-max (* 1024 1024)) ;; 1mb
|
|
||||||
)
|
|
||||||
|
|
||||||
;; Vuejs moud
|
|
||||||
(use-package vue-mode
|
|
||||||
:mode "\\.vue\\'"
|
|
||||||
:config (add-hook 'vue-mode-hook #'lsp))
|
|
||||||
;; Popravek za grdo ozadje
|
|
||||||
(add-hook 'mmm-mode-hook
|
|
||||||
(lambda ()
|
|
||||||
(set-face-background 'mmm-default-submode-face nil)))
|
|
||||||
|
|
||||||
;; PHP ko je treba
|
|
||||||
(use-package php-mode
|
|
||||||
:mode "\\.(php|module)\\'"
|
|
||||||
:general
|
|
||||||
(start/leader-keys
|
|
||||||
:infix "d"
|
|
||||||
"" '(:ignore t :wk "drupal")
|
|
||||||
"d" (defun drupal-cache-rebuild ()
|
|
||||||
(interactive)
|
|
||||||
(shell-command "drush cr"))))
|
|
||||||
|
|
||||||
;; Guile scheme
|
|
||||||
(use-package geiser-guile
|
|
||||||
:mode "\\.scm\\'"
|
|
||||||
:general
|
|
||||||
(start/leader-keys
|
|
||||||
:infix "s"
|
|
||||||
"" '(:ignore t :wk "geiser")
|
|
||||||
"b" 'geiser-eval-buffer
|
|
||||||
"e" 'geiser-eval-expression
|
|
||||||
"s" (defun geiser-start-and-eval-buffer ()
|
|
||||||
(interactive)
|
|
||||||
(geiser-guile)
|
|
||||||
(previous-buffer)
|
|
||||||
(geiser-eval-buffer))
|
|
||||||
"s" 'geiser-start-and-eval-buffer
|
|
||||||
"g" 'geiser
|
|
||||||
"c" 'geiser-connect
|
|
||||||
"k" 'geiser-exit-repl
|
|
||||||
"r" (defun geiser-restart ()
|
|
||||||
;(interactive)
|
|
||||||
(geiser-exit-repl)
|
|
||||||
(geiser-start-and-eval-buffer)))
|
|
||||||
:init (setq scheme-program-name "guile"))
|
|
||||||
|
|
||||||
;; Racket podpora
|
|
||||||
(use-package racket-mode :mode "\\.rkt\\'")
|
|
||||||
|
|
||||||
;; Rainbowz
|
|
||||||
(use-package rainbow-delimiters
|
|
||||||
:hook ((prog-mode . rainbow-delimiters-mode)))
|
|
||||||
|
|
||||||
;; Config fajli
|
|
||||||
(use-package yaml-mode :mode "\\.yaml\\'")
|
|
||||||
(use-package toml-mode :mode "\\.toml\\'")
|
|
||||||
|
|
||||||
;; Extempore lajv kodiranje!
|
|
||||||
(use-package extempore-mode :mode "\\.xtm\\'")
|
|
||||||
|
|
||||||
;; Syntax checker
|
|
||||||
(use-package flycheck :defer t)
|
|
||||||
|
|
||||||
;; Vmesnik za GIT
|
|
||||||
(use-package magit
|
|
||||||
:defer t
|
|
||||||
:general
|
|
||||||
(start/leader-keys
|
|
||||||
"g" '(:ignore t :wk "magit")
|
|
||||||
"g s" 'magit-status))
|
|
||||||
|
|
||||||
(use-package magit-todos
|
|
||||||
:after magit
|
|
||||||
:config (magit-todos-mode 1))
|
|
||||||
|
|
||||||
;; Drupal pomocnik
|
|
||||||
(use-package drupal-mode :after php-mode)
|
|
||||||
|
|
||||||
;; Oblikovanje kode za razne jezike
|
|
||||||
(use-package format-all :defer t)
|
|
||||||
|
|
||||||
;; Tidal cycles live coding
|
|
||||||
(use-package tidal
|
|
||||||
:defer t
|
|
||||||
:init
|
|
||||||
;; Tidal cycles lokacija
|
|
||||||
(setq tidal-boot-script-path "~/.cabal/store/ghc-9.0.2/tidal-1.9.2-8e9cf9a217d87a6950880512f51893a6434970cd0690e831c563fc64ebd5de8f/share/BootTidal.hs"))
|
|
||||||
|
|
||||||
;; JS indentacije
|
|
||||||
(setq js2-strict-missing-semi-warning nil
|
|
||||||
js2-missing-semi-one-line-override nil
|
|
||||||
js2-basic-offset 2
|
|
||||||
js-indent-level 2
|
|
||||||
indent-tabs-mode nil
|
|
||||||
tab-width 2)
|
|
||||||
|
|
||||||
;; js2 za javascript
|
|
||||||
(use-package js2-mode
|
|
||||||
:mode "\\.js\\'"
|
|
||||||
:config
|
|
||||||
;(add-to-list 'auto-mode-alist '("\\.js$" . js2-mode))
|
|
||||||
)
|
|
||||||
|
|
||||||
;; Še en mode za JS, bolj react
|
|
||||||
(use-package rjsx-mode :after js2-mode)
|
|
||||||
|
|
||||||
;; css indent
|
|
||||||
(setq css-indent-level 2)
|
|
||||||
(setq css-indent-offset 2)
|
|
||||||
|
|
||||||
;; Python indent
|
|
||||||
(setq python-indent-offset 2)
|
|
||||||
|
|
||||||
;; Arduino
|
|
||||||
(use-package arduino-mode :mode "\\.ino\\'")
|
|
||||||
|
|
||||||
;; Supercollider
|
|
||||||
(add-to-list 'load-path "/usr/share/emacs/site-lisp/SuperCollider/") ;; path will depend on your compilation settings
|
|
||||||
(use-package sclang
|
|
||||||
:ensure f
|
|
||||||
:defer t
|
|
||||||
:config
|
|
||||||
(global-set-key (kbd "S-RET") 'sclang-eval-region-or-line)
|
|
||||||
(global-set-key (kbd "C-.") 'sclang-server-free-all))
|
|
||||||
|
|
||||||
;; FLUXUS!
|
|
||||||
(use-package fluxus-mode :defer t)
|
|
||||||
|
|
||||||
;; Python virtualenv podpora
|
|
||||||
(use-package pyvenv
|
|
||||||
:mode "\\.py\\'"
|
|
||||||
:config
|
|
||||||
(pyvenv-mode t)
|
|
||||||
|
|
||||||
;; Set correct Python interpreter
|
|
||||||
(setq pyvenv-post-activate-hooks
|
|
||||||
(list (lambda ()
|
|
||||||
(setq python-shell-interpreter (concat pyvenv-virtual-env "bin/python3")))))
|
|
||||||
(setq pyvenv-post-deactivate-hooks
|
|
||||||
(list (lambda ()
|
|
||||||
(setq python-shell-interpreter "python3")))))
|
|
||||||
|
|
||||||
;; REST web client
|
|
||||||
(use-package restclient
|
|
||||||
:defer t)
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
|
|
||||||
;; SARDINE MODE
|
|
||||||
;; =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
|
|
||||||
;; Customize the python-mode to run Sardine code using the terminal.
|
|
||||||
|
|
||||||
(setq
|
|
||||||
; python-shell-interpreter "fishery"
|
|
||||||
; python-shell-interpreter-args "")
|
|
||||||
python-shell-interpreter "python3"
|
|
||||||
python-shell-interpreter-args "")
|
|
||||||
|
|
||||||
(defun sardine/start-sardine ()
|
|
||||||
"Start a new interactive Sardine Session"
|
|
||||||
(interactive)
|
|
||||||
(run-python))
|
|
||||||
|
|
||||||
(defun sardine/eval-block ()
|
|
||||||
"Evaluate a sardine code block"
|
|
||||||
(interactive)
|
|
||||||
(mark-paragraph)
|
|
||||||
(if (and transient-mark-mode mark-active)
|
|
||||||
(python-shell-send-region (point) (mark))
|
|
||||||
(python-shell-send-region (point-at-bol) (point-at-eol)))
|
|
||||||
(forward-paragraph))
|
|
||||||
|
|
||||||
(defun sardine/stop-code ()
|
|
||||||
"Stop all the Sardine code currently running"
|
|
||||||
(interactive)
|
|
||||||
(python-shell-send-string "panic()"))
|
|
||||||
|
|
||||||
; Unmapping keys from the Python mode
|
|
||||||
;(add-hook 'python-mode-hook
|
|
||||||
; (lambda() (local-unset-key (kbd "C-c C-c"))))
|
|
||||||
;(add-hook 'python-mode-hook
|
|
||||||
; (lambda() (local-unset-key (kbd "C-c C-s"))))
|
|
||||||
|
|
||||||
; Remapping keys
|
|
||||||
(global-set-key (kbd "C-M-x") #'sardine/eval-block)
|
|
||||||
(global-set-key (kbd "C-M-.") #'sardine/stop-code)
|
|
||||||
|
|
||||||
; Avtomatski tree sitter loader!
|
|
||||||
(use-package treesit-auto :defer t)
|
|
||||||
|
|
||||||
;; Tree sitter asociacije za programske jezike
|
|
||||||
(dolist
|
|
||||||
(item (list '("\\.css\\'" . css-ts-mode)
|
|
||||||
'("\\.json\\'" . json-ts-mode)
|
|
||||||
'("\\.php\\'" . php-ts-mode)
|
|
||||||
'("\\.py\\'" . python-ts-mode)
|
|
||||||
'("\\.js\\'" . js-ts-mode)))
|
|
||||||
(add-to-list 'auto-mode-alist item))
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;
|
|
||||||
;; ORGMODE ;;
|
|
||||||
;;;;;;;;;;;;;
|
|
||||||
|
|
||||||
(use-package org
|
|
||||||
:mode "\\.org\\'"
|
|
||||||
:config
|
|
||||||
;; Skrij znake za oblikovanje (* za bold, / za podcrtanje...)
|
|
||||||
(setq org-hide-emphasis-markers t)
|
|
||||||
;; pikice v sredini za sezname
|
|
||||||
(font-lock-add-keywords
|
|
||||||
'org-mode
|
|
||||||
'(("^ *\\([-]\\) "
|
|
||||||
(0 (prog1 () (compose-region (match-beginning 1) (match-end 1) "•"))))))
|
|
||||||
;; Drugačne pisave za naslove, svoje velikosti
|
|
||||||
;; Vir: https://zzamboni.org/post/beautifying-org-mode-in-emacs/
|
|
||||||
(let* ((variable-tuple
|
|
||||||
(cond ((x-list-fonts "ETBembo") '(:font "ETBembo"))
|
|
||||||
((x-list-fonts "Source Sans Pro") '(:font "Source Sans Pro"))
|
|
||||||
((x-list-fonts "Lucida Grande") '(:font "Lucida Grande"))
|
|
||||||
((x-list-fonts "Verdana") '(:font "Verdana"))
|
|
||||||
((x-family-fonts "Sans Serif") '(:family "Sans Serif"))
|
|
||||||
(nil (warn "Cannot find a Sans Serif Font. Install Source Sans Pro."))))
|
|
||||||
(base-font-color (face-foreground 'default nil 'default))
|
|
||||||
(headline `(:inherit default :weight bold :foreground ,base-font-color)))
|
|
||||||
|
|
||||||
(custom-theme-set-faces
|
|
||||||
'user
|
|
||||||
`(org-level-8 ((t (,@headline ,@variable-tuple))))
|
|
||||||
`(org-level-7 ((t (,@headline ,@variable-tuple))))
|
|
||||||
`(org-level-6 ((t (,@headline ,@variable-tuple))))
|
|
||||||
`(org-level-5 ((t (,@headline ,@variable-tuple))))
|
|
||||||
`(org-level-4 ((t (,@headline ,@variable-tuple :height 1.1))))
|
|
||||||
`(org-level-3 ((t (,@headline ,@variable-tuple :height 1.25))))
|
|
||||||
`(org-level-2 ((t (,@headline ,@variable-tuple :height 1.5))))
|
|
||||||
`(org-level-1 ((t (,@headline ,@variable-tuple :height 1.75))))
|
|
||||||
`(org-document-title ((t (,@headline ,@variable-tuple :height 2.0 :underline nil))))))
|
|
||||||
|
|
||||||
;; DOT diagrami
|
|
||||||
(org-babel-do-load-languages
|
|
||||||
'org-babel-load-languages
|
|
||||||
'((dot . t)))
|
|
||||||
|
|
||||||
;; ditaa diagrami
|
|
||||||
(org-babel-do-load-languages
|
|
||||||
'org-babel-load-languages
|
|
||||||
'((ditaa . t))))
|
|
||||||
|
|
||||||
;; Evil orgmode
|
|
||||||
(use-package evil-org
|
|
||||||
:after org
|
|
||||||
:hook (org-mode . (lambda () (evil-org-mode)))
|
|
||||||
:general
|
|
||||||
(start/leader-keys
|
|
||||||
;; ORGmode ukazi
|
|
||||||
"o" '(:ignore t :wk "orgmode")
|
|
||||||
"o c" 'org-capture
|
|
||||||
"o a" 'org-agenda)
|
|
||||||
:config
|
|
||||||
(require 'evil-org-agenda)
|
|
||||||
(evil-org-set-key-theme '(navigation insert textobjects additional calendar))
|
|
||||||
(evil-org-agenda-set-keys)
|
|
||||||
|
|
||||||
;; Odpiranje linkov kar z enter v ORG dokumentih
|
|
||||||
(defun odpri-org-link ()
|
|
||||||
"Odpri link v ORG fajlu pod kurzorjem"
|
|
||||||
(interactive)
|
|
||||||
(if (org-in-regexp org-link-any-re nil t)
|
|
||||||
(org-open-at-point)
|
|
||||||
nil))
|
|
||||||
|
|
||||||
(general-evil-define-key
|
|
||||||
'normal
|
|
||||||
org-mode-map
|
|
||||||
"RET" 'odpri-org-link))
|
|
||||||
|
|
||||||
;; Šminka za naslove
|
|
||||||
(use-package org-bullets
|
|
||||||
:after org
|
|
||||||
:hook ((org-mode . (lambda () (org-bullets-mode 1)))))
|
|
||||||
|
|
||||||
;; Lepsi fonti
|
|
||||||
(setq org-src-fontify-natively t)
|
|
||||||
|
|
||||||
;; Stanja taskov
|
|
||||||
(setq org-todo-keywords
|
|
||||||
'((sequence "TODO" "V DELU" "TESTIRANJE" "DOKUMENTIRANJE" "KONČANO")))
|
|
||||||
|
|
||||||
;; Aktiviraj ob .org fajlih
|
|
||||||
(add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
|
|
||||||
|
|
||||||
;; CalDav v orgmode!
|
|
||||||
(use-package org-caldav
|
|
||||||
:defer t
|
|
||||||
:init
|
|
||||||
(setq org-caldav-url "https://goba.rhiz0.me/remote.php/dav/calendars/g1smo"
|
|
||||||
org-caldav-files '("~/org/todo.org")
|
|
||||||
org-icalendar-timezone "Europe/Ljubljana"
|
|
||||||
org-caldav-calendars '((:calendar-id "org"
|
|
||||||
;:files '("~/org/todo.org")
|
|
||||||
:inbox "~/org/koledarji/org-in.org")
|
|
||||||
(:calendar-id "personal"
|
|
||||||
:inbox "~/org/koledarji/osebno-in.org")
|
|
||||||
(:calendar-id "megla"
|
|
||||||
:inbox "~/org/koledarji/megla-in.org"))))
|
|
||||||
|
|
||||||
;; Nacin za pisanje brez distrakcij
|
|
||||||
(use-package writeroom-mode
|
|
||||||
:defer t
|
|
||||||
:config
|
|
||||||
:hook ((org-mode . (lambda ()
|
|
||||||
(display-line-numbers-mode -1)))))
|
|
||||||
|
|
||||||
;; HTMLize za barvanje kode v org izvozu v HTML
|
|
||||||
(use-package htmlize :after org-mode :defer t)
|
|
||||||
|
|
||||||
;; Lokacije ORG agenda vnosov
|
|
||||||
(setq org-agenda-files (list "~/rs/org" "~/org"))
|
|
||||||
|
|
||||||
;; Zapiski
|
|
||||||
(setq org-default-notes-file "~/org/zapiski.org")
|
|
||||||
|
|
||||||
;; Zacnimo na ponedeljek, kot se spodobi
|
|
||||||
(setq calendar-week-start-day 1)
|
|
||||||
|
|
||||||
;; Mermaid v orgmode (diagrami)
|
|
||||||
(use-package ob-mermaid
|
|
||||||
:defer t
|
|
||||||
:config
|
|
||||||
;; sudo npm install -g @mermaid-js/mermaid-cli
|
|
||||||
(setq ob-mermaid-cli-path "/usr/local/bin/mmdc")
|
|
||||||
(org-babel-do-load-languages
|
|
||||||
'org-babel-load-languages
|
|
||||||
'((mermaid . t)
|
|
||||||
(scheme . t))))
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;;;;;;;;;;;;;
|
|
||||||
;; E-pošta ;;
|
|
||||||
;;;;;;;;;;;;;
|
|
||||||
(setq mu4e-get-mail-command "mbsync -a")
|
|
||||||
|
|
||||||
;; Ikonice
|
|
||||||
(use-package mu4e-marker-icons
|
|
||||||
:defer t
|
|
||||||
:config
|
|
||||||
(mu4e-marker-icons-mode 1))
|
|
||||||
|
|
||||||
;; Email paketi iz githuba
|
|
||||||
;(use-package quelpa-use-package)
|
|
||||||
|
|
||||||
(use-package mu4e-dashboard
|
|
||||||
:defer t
|
|
||||||
:after mu4e
|
|
||||||
:vc "https://github.com/rougier/mu4e-dashboard")
|
|
||||||
;:quelpa (mu4e-dashboard
|
|
||||||
; :fetcher github
|
|
||||||
; :repo "rougier/mu4e-dashboard"))
|
|
||||||
|
|
||||||
;; @TODO konfiguracija!
|
|
||||||
;; - dashboard: https://github.com/rougier/mu4e-dashboard
|
|
||||||
;; - thread folding: https://github.com/rougier/mu4e-thread-folding
|
|
||||||
;; - svg tag mode: https://github.com/rougier/svg-tag-mode
|
|
||||||
;; - views: https://github.com/lordpretzel/mu4e-views
|
|
||||||
;;
|
|
||||||
;; Za zgled:
|
|
||||||
;; mu4e look & feel: https://www.reddit.com/r/emacs/comments/mzgsm0/mu4e_look_and_feel/
|
|
||||||
;; nano-mu4e: https://github.com/rougier/nano-emacs/blob/master/nano-mu4e.el
|
|
||||||
;; system crafters o emacs emailu: https://www.youtube.com/watch?v=yZRyEhi4y44&list=PLEoMzSkcN8oM-kA19xOQc8s0gr0PpFGJQ
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;;;;;;;;;;;
|
;;;;;;;;;;;
|
||||||
;; Razno ;;
|
;; Razno ;;
|
||||||
;;;;;;;;;;;
|
;;;;;;;;;;;
|
||||||
|
|
||||||
;; IVY autocomplete! <3
|
|
||||||
(use-package ivy
|
|
||||||
:general
|
|
||||||
(start/leader-keys
|
|
||||||
"," 'ivy-switch-buffer
|
|
||||||
"b b" 'ivy-switch-buffer)
|
|
||||||
:config
|
|
||||||
(ivy-mode)
|
|
||||||
(setq ivy-use-virtual-buffers t)
|
|
||||||
(setq enable-recursive-minibuffers t)
|
|
||||||
(local-set-key (kbd "C-j") 'ivy-next-line)
|
|
||||||
(local-set-key (kbd "C-k") 'ivy-prevous-line)
|
|
||||||
(local-set-key [remap scroll-up-command] 'ivy-scroll-up-command)
|
|
||||||
(local-set-key [remap scroll-down-command] 'ivy-scroll-down-command)
|
|
||||||
(global-set-key (kbd "C-c C-r") 'ivy-resume)
|
|
||||||
(global-set-key (kbd "<f6>") 'ivy-resume))
|
|
||||||
|
|
||||||
;; Vedno sledi symlinkom v git
|
|
||||||
(setq vc-follow-symlinks t)
|
|
||||||
|
|
||||||
;; Swiper search
|
|
||||||
(use-package swiper
|
|
||||||
:defer t
|
|
||||||
:config
|
|
||||||
(global-set-key "\C-s" 'swiper))
|
|
||||||
|
|
||||||
;; Izboljsani default ukazi bolj prijazni
|
;; Izboljsani default ukazi bolj prijazni
|
||||||
(use-package counsel
|
|
||||||
:config
|
|
||||||
(global-set-key (kbd "M-x") 'counsel-M-x)
|
|
||||||
(global-set-key (kbd "C-x C-f") 'counsel-find-file)
|
|
||||||
(global-set-key (kbd "<f1> f") 'counsel-describe-function)
|
|
||||||
(global-set-key (kbd "<f1> v") 'counsel-describe-variable)
|
|
||||||
(global-set-key (kbd "<f1> o") 'counsel-describe-symbol)
|
|
||||||
(global-set-key (kbd "<f1> l") 'counsel-find-library)
|
|
||||||
(global-set-key (kbd "<f2> i") 'counsel-info-lookup-symbol)
|
|
||||||
(global-set-key (kbd "<f2> u") 'counsel-unicode-char)
|
|
||||||
(global-set-key (kbd "C-c g") 'counsel-git)
|
|
||||||
(global-set-key (kbd "C-c j") 'counsel-git-grep)
|
|
||||||
(global-set-key (kbd "C-c k") 'counsel-ag)
|
|
||||||
(global-set-key (kbd "C-x l") 'counsel-locate)
|
|
||||||
(define-key minibuffer-local-map (kbd "C-r") 'counsel-minibuffer-history)
|
|
||||||
|
|
||||||
(start/leader-keys
|
|
||||||
"RET" 'counsel-bookmark
|
|
||||||
"/" 'counsel-projectile-rg)
|
|
||||||
|
|
||||||
;; Ripgrep ignore
|
|
||||||
(defvar my-rg-excludes '("node_modules")
|
|
||||||
"List of directories to exclude from `counsel-rg' results.")
|
|
||||||
(define-advice counsel-rg
|
|
||||||
(:around (fn &optional in dir opts &rest args) my-glob)
|
|
||||||
"Exclude `my-rg-excludes' from `counsel-rg' results."
|
|
||||||
(let ((dir (or dir default-directory)))
|
|
||||||
(dolist (x my-rg-excludes)
|
|
||||||
(let ((glob (and (file-in-directory-p x dir)
|
|
||||||
(file-relative-name (expand-file-name "**" x) dir))))
|
|
||||||
(when glob (setq opts (concat "-g !" glob (and opts " ") opts))))))
|
|
||||||
(apply fn in dir opts args)))
|
|
||||||
|
|
||||||
|
|
||||||
;; Iskanje po fajlih (fulltext)
|
;; Iskanje po fajlih (fulltext)
|
||||||
(use-package rg
|
;(use-package rg
|
||||||
:defer t
|
; :defer t
|
||||||
:config
|
; :config
|
||||||
(rg-enable-default-bindings))
|
; (rg-enable-default-bindings))
|
||||||
|
|
||||||
;; Pomoc
|
;; Pomoc
|
||||||
(use-package helpful :defer t)
|
(use-package helpful :defer t)
|
||||||
|
|
||||||
;; Prikazi nedavne ukaze pri vrhu v M-x
|
|
||||||
(use-package smex :defer t)
|
|
||||||
|
|
||||||
;; Pomoc za keybinde
|
;; Pomoc za keybinde
|
||||||
(use-package which-key
|
(use-package which-key
|
||||||
:defer t
|
:defer t
|
||||||
|
@ -631,11 +30,6 @@
|
||||||
|
|
||||||
(use-package zone-nyan :defer t)
|
(use-package zone-nyan :defer t)
|
||||||
|
|
||||||
;; Prikazi startup time
|
|
||||||
(add-to-list 'after-init-hook
|
|
||||||
(lambda ()
|
|
||||||
(message (concat "emacs (" (number-to-string (emacs-pid)) ") started in " (emacs-init-time)))))
|
|
||||||
|
|
||||||
;; Backup fajli emacsa
|
;; Backup fajli emacsa
|
||||||
(setq
|
(setq
|
||||||
backup-by-copying t ; don't clobber symlinks
|
backup-by-copying t ; don't clobber symlinks
|
||||||
|
@ -777,22 +171,23 @@
|
||||||
"/home/g1smo/rs/org/irs_old.org" "/home/g1smo/rs/org/kaki.org"
|
"/home/g1smo/rs/org/irs_old.org" "/home/g1smo/rs/org/kaki.org"
|
||||||
"/home/g1smo/rs/org/prepoznava-komadov.org"))
|
"/home/g1smo/rs/org/prepoznava-komadov.org"))
|
||||||
'(package-selected-packages
|
'(package-selected-packages
|
||||||
'(restclient php-ts-mode org-bullets magit-todos treesit-auto eat
|
'(mu4e org-mode restclient php-ts-mode org-bullets magit-todos
|
||||||
zone-nyan yaml-mode writeroom-mode which-key web-mode
|
treesit-auto eat zone-nyan yaml-mode writeroom-mode
|
||||||
web-beautify vue-mode undo-tree treemacs-projectile
|
which-key web-mode web-beautify vue-mode undo-tree
|
||||||
treemacs-evil toml-mode tidal subed smex smartparens
|
treemacs-projectile treemacs-evil toml-mode tidal subed smex
|
||||||
sclang-extensions rjsx-mode rg rainbow-delimiters
|
smartparens sclang-extensions rjsx-mode rg
|
||||||
racket-mode quelpa-use-package pyvenv org-caldav
|
rainbow-delimiters racket-mode quelpa-use-package pyvenv
|
||||||
openwith ob-mermaid mu4e-marker-icons mu4e-dashboard
|
org-caldav openwith ob-mermaid mu4e-marker-icons
|
||||||
magit lsp-mode htmlize helpful guix gruvbox-theme
|
mu4e-dashboard magit lsp-mode htmlize helpful guix
|
||||||
general geiser-guile format-all flycheck fluxus-mode
|
gruvbox-theme general geiser-guile format-all flycheck
|
||||||
extempore-mode evil-org evil-collection editorconfig
|
fluxus-mode extempore-mode evil-org evil-collection
|
||||||
drupal-mode doom-modeline dashboard crdt
|
editorconfig drupal-mode doom-modeline dashboard crdt
|
||||||
counsel-projectile company benchmark-init arduino-mode
|
counsel-projectile company benchmark-init arduino-mode
|
||||||
all-the-icons 2bit))
|
all-the-icons 2bit))
|
||||||
'(tool-bar-mode nil)
|
'(tool-bar-mode nil)
|
||||||
'(warning-minimum-level :error)
|
'(warning-minimum-level :error)
|
||||||
'(which-key-mode t))
|
'(which-key-mode t))
|
||||||
|
|
||||||
(custom-set-faces
|
(custom-set-faces
|
||||||
;; custom-set-faces was added by Custom.
|
;; custom-set-faces was added by Custom.
|
||||||
;; If you edit it by hand, you could mess it up, so be careful.
|
;; If you edit it by hand, you could mess it up, so be careful.
|
||||||
|
@ -801,15 +196,18 @@
|
||||||
'(default ((t (:family "Iosevka SS01" :foundry "BE5N" :slant normal :weight semi-bold :height 120 :width normal))))
|
'(default ((t (:family "Iosevka SS01" :foundry "BE5N" :slant normal :weight semi-bold :height 120 :width normal))))
|
||||||
'(line-number ((t (:background "#32302f" :foreground "#7c6f64"))))
|
'(line-number ((t (:background "#32302f" :foreground "#7c6f64"))))
|
||||||
'(line-number-current-line ((t (:background "#32302f" :foreground "#fe8019"))))
|
'(line-number-current-line ((t (:background "#32302f" :foreground "#fe8019"))))
|
||||||
'(org-document-title ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 2.0 :underline nil))))
|
'(org-block ((t (:extend t :background "#3c3836"))))
|
||||||
'(org-level-1 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.75))))
|
'(org-code ((t (:foreground "#dd6f48"))))
|
||||||
'(org-level-2 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.5))))
|
'(org-document-title ((t (:underline nil :weight bold :height 2.0 :family "Sans Serif"))))
|
||||||
'(org-level-3 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.25))))
|
'(org-level-1 ((t (:extend nil :weight bold :height 1.75 :family "Sans Serif"))))
|
||||||
'(org-level-4 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.1))))
|
'(org-level-2 ((t (:extend nil :weight bold :height 1.45 :family "Sans Serif"))))
|
||||||
'(org-level-5 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif"))))
|
'(org-level-3 ((t (:extend nil :weight bold :height 1.25 :family "Sans Serif"))))
|
||||||
'(org-level-6 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif"))))
|
'(org-level-4 ((t (:extend nil :weight bold :height 1.1 :family "Sans Serif"))))
|
||||||
'(org-level-7 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif"))))
|
'(org-level-5 ((t (:extend nil :weight bold :family "Sans Serif"))))
|
||||||
'(org-level-8 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif")))))
|
'(org-level-6 ((t (:inherit default :weight bold :foreground "#DCDCCC" :family "Sans Serif"))))
|
||||||
|
'(org-level-7 ((t (:inherit default :weight bold :foreground "#DCDCCC" :family "Sans Serif"))))
|
||||||
|
'(org-level-8 ((t (:inherit default :weight bold :foreground "#DCDCCC" :family "Sans Serif"))))
|
||||||
|
'(org-verbatim ((t (:foreground "#fb4933")))))
|
||||||
|
|
||||||
|
|
||||||
;; supercollider mode load
|
;; supercollider mode load
|
||||||
|
|
Loading…
Reference in New Issue