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
|
||||
(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 ;;
|
||||
;;;;;;;;;;;
|
||||
|
||||
;; 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
|
||||
(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)
|
||||
(use-package rg
|
||||
:defer t
|
||||
:config
|
||||
(rg-enable-default-bindings))
|
||||
;(use-package rg
|
||||
; :defer t
|
||||
; :config
|
||||
; (rg-enable-default-bindings))
|
||||
|
||||
;; Pomoc
|
||||
(use-package helpful :defer t)
|
||||
|
||||
;; Prikazi nedavne ukaze pri vrhu v M-x
|
||||
(use-package smex :defer t)
|
||||
|
||||
;; Pomoc za keybinde
|
||||
(use-package which-key
|
||||
:defer t
|
||||
|
@ -631,11 +30,6 @@
|
|||
|
||||
(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
|
||||
(setq
|
||||
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/prepoznava-komadov.org"))
|
||||
'(package-selected-packages
|
||||
'(restclient php-ts-mode org-bullets magit-todos treesit-auto eat
|
||||
zone-nyan yaml-mode writeroom-mode which-key web-mode
|
||||
web-beautify vue-mode undo-tree treemacs-projectile
|
||||
treemacs-evil toml-mode tidal subed smex smartparens
|
||||
sclang-extensions rjsx-mode rg rainbow-delimiters
|
||||
racket-mode quelpa-use-package pyvenv org-caldav
|
||||
openwith ob-mermaid mu4e-marker-icons mu4e-dashboard
|
||||
magit lsp-mode htmlize helpful guix gruvbox-theme
|
||||
general geiser-guile format-all flycheck fluxus-mode
|
||||
extempore-mode evil-org evil-collection editorconfig
|
||||
drupal-mode doom-modeline dashboard crdt
|
||||
counsel-projectile company benchmark-init arduino-mode
|
||||
all-the-icons 2bit))
|
||||
'(mu4e org-mode restclient php-ts-mode org-bullets magit-todos
|
||||
treesit-auto eat zone-nyan yaml-mode writeroom-mode
|
||||
which-key web-mode web-beautify vue-mode undo-tree
|
||||
treemacs-projectile treemacs-evil toml-mode tidal subed smex
|
||||
smartparens sclang-extensions rjsx-mode rg
|
||||
rainbow-delimiters racket-mode quelpa-use-package pyvenv
|
||||
org-caldav openwith ob-mermaid mu4e-marker-icons
|
||||
mu4e-dashboard magit lsp-mode htmlize helpful guix
|
||||
gruvbox-theme general geiser-guile format-all flycheck
|
||||
fluxus-mode extempore-mode evil-org evil-collection
|
||||
editorconfig drupal-mode doom-modeline dashboard crdt
|
||||
counsel-projectile company benchmark-init arduino-mode
|
||||
all-the-icons 2bit))
|
||||
'(tool-bar-mode nil)
|
||||
'(warning-minimum-level :error)
|
||||
'(which-key-mode t))
|
||||
|
||||
(custom-set-faces
|
||||
;; custom-set-faces was added by Custom.
|
||||
;; 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))))
|
||||
'(line-number ((t (:background "#32302f" :foreground "#7c6f64"))))
|
||||
'(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-level-1 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.75))))
|
||||
'(org-level-2 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.5))))
|
||||
'(org-level-3 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.25))))
|
||||
'(org-level-4 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif" :height 1.1))))
|
||||
'(org-level-5 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif"))))
|
||||
'(org-level-6 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif"))))
|
||||
'(org-level-7 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif"))))
|
||||
'(org-level-8 ((t (:inherit default :weight bold :foreground "#ebdbb2" :family "Sans Serif")))))
|
||||
'(org-block ((t (:extend t :background "#3c3836"))))
|
||||
'(org-code ((t (:foreground "#dd6f48"))))
|
||||
'(org-document-title ((t (:underline nil :weight bold :height 2.0 :family "Sans Serif"))))
|
||||
'(org-level-1 ((t (:extend nil :weight bold :height 1.75 :family "Sans Serif"))))
|
||||
'(org-level-2 ((t (:extend nil :weight bold :height 1.45 :family "Sans Serif"))))
|
||||
'(org-level-3 ((t (:extend nil :weight bold :height 1.25 :family "Sans Serif"))))
|
||||
'(org-level-4 ((t (:extend nil :weight bold :height 1.1 :family "Sans Serif"))))
|
||||
'(org-level-5 ((t (:extend nil :weight bold :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
|
||||
|
|
Loading…
Reference in New Issue