feat: ?? emacs lol

This commit is contained in:
Flinner 2021-08-06 02:21:12 +03:00
parent f39c169b3e
commit af82f723de
Signed by: flinner
GPG Key ID: 95CE0DA7F0E58CA6
1 changed files with 97 additions and 42 deletions

View File

@ -88,6 +88,7 @@ Better Scrolling
(use-package smooth-scrolling (use-package smooth-scrolling
:custom (smooth-scrolling-mode 1)) :custom (smooth-scrolling-mode 1))
#+end_src #+end_src
** Fonts ** Fonts
#+begin_src emacs-lisp #+begin_src emacs-lisp
(setq my/ui/monofont "Fira Code") (setq my/ui/monofont "Fira Code")
@ -141,6 +142,7 @@ Actuall Theme:
;; Your init file should contain only one such instance. ;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(flycheck-warning ((t (:background "#282828" :underline "#fabd2f")))) '(flycheck-warning ((t (:background "#282828" :underline "#fabd2f"))))
'(org-date ((t (:inherit fixed-pitch))))
'(ivy-posframe-border ((t (:background "#ffffff"))))) '(ivy-posframe-border ((t (:background "#ffffff")))))
;; Enable custom neotree theme (all-the-icons must be installed!) ;; Enable custom neotree theme (all-the-icons must be installed!)
@ -250,6 +252,7 @@ E: honestly I have no clue wtf that meant, but I will keep it
#+end_src #+end_src
*** leader-keys *** leader-keys
**** config head declartion
#+begin_src emacs-lisp #+begin_src emacs-lisp
:config :config
(general-create-definer my/leader-keys (general-create-definer my/leader-keys
@ -285,6 +288,8 @@ E: honestly I have no clue wtf that meant, but I will keep it
"hk" '(helpful-key :which-key "Describe Key") "hk" '(helpful-key :which-key "Describe Key")
"hf" '(counsel-describe-function :which-key "Describe Function") "hf" '(counsel-describe-function :which-key "Describe Function")
"hv" '(counsel-describe-variable :which-key "Describe Variable") "hv" '(counsel-describe-variable :which-key "Describe Variable")
"hF" '(counsel-describe-face :which-key "Describe Face")
"hi" '(info :which-key "info")
#+end_src #+end_src
**** search (s) **** search (s)
@ -299,7 +304,7 @@ E: honestly I have no clue wtf that meant, but I will keep it
"f" '(:ignore t :which-key "Files") "f" '(:ignore t :which-key "Files")
"fr" '(counsel-recentf :which-key "Recent Files") "fr" '(counsel-recentf :which-key "Recent Files")
"fp" '(my/keybind/config :which-key "Recent Files") "fp" '(my/keybind/config :which-key "Config")
"fd" '(dired :which-key "dired prompt") "fd" '(dired :which-key "dired prompt")
"fD" '(dired-jump :which-key "dired current") "fD" '(dired-jump :which-key "dired current")
#+end_src #+end_src
@ -352,6 +357,8 @@ Capture
"ot" '(vterm-other-window :which-key "Vterm in other window") "ot" '(vterm-other-window :which-key "Vterm in other window")
"ob" '(bookmark-jump :which-key "Bookmark Jump") "ob" '(bookmark-jump :which-key "Bookmark Jump")
"oB" '(bookmark-set :which-key "Bookmark set") "oB" '(bookmark-set :which-key "Bookmark set")
"oe" '(elfeed-dashboard :which-key "Bookmark set")
#+end_src #+end_src
**** Buffers (b) **** Buffers (b)
@ -617,7 +624,7 @@ Ivy Rich for having =M-x= description and keybinds
:init (ivy-rich-mode 1)) :init (ivy-rich-mode 1))
#+end_src #+end_src
Ivy floating Ivy floating
#+begin_src emacs-lisp #+begin_src emacs-lisp :tangle no
(use-package ivy-posframe (use-package ivy-posframe
:after ivy :after ivy
:diminish :diminish
@ -727,15 +734,17 @@ Modes To Start
use-package use-package
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package org (use-package org
:defer t :defer 3
:hook (org-mode . my/org-mode/org-mode-setup) :hook (org-mode . my/org-mode/org-mode-setup)
(org-mode . my/org-mode/load-prettify-symbols); symbols (org-mode . my/org-mode/load-prettify-symbols); symbols
(org-mode . auto-fill-mode) (org-mode . auto-fill-mode)
:config :config
(require 'org-tempo) (require 'org-tempo)
(require 'org-habit) (require 'org-habit)
(setq geiser-default-implementation 'guile)
(setq org-ellipsis " ⤵") (setq org-ellipsis " ⤵")
(setq org-agenda-start-with-log-mode t) (setq org-agenda-start-with-log-mode t)
(setq org-highlight-latex-and-related '(latex))
(setq org-log-done 'time) (setq org-log-done 'time)
(setq org-log-into-drawer t) (setq org-log-into-drawer t)
(dolist (face '((org-document-title . 2.0) (dolist (face '((org-document-title . 2.0)
@ -765,6 +774,9 @@ use-package
(setq org-directory "~/Documents/gtd/" (setq org-directory "~/Documents/gtd/"
org-roam-directory "~/Documents/roam/" org-roam-directory "~/Documents/roam/"
org-agenda-files (list org-directory (concat org-roam-directory "life.org")) org-agenda-files (list org-directory (concat org-roam-directory "life.org"))
rmh-elfeed-org-files (list "~/Documents/private.el/elfeed.org")
elfeed-dashboard-file "~/Documents/private.el/elfeed-dashboard.org"
org-preview-latex-image-directory "/tmp/ltximg"
) )
#+end_src #+end_src
@ -839,6 +851,7 @@ Don't confirm, I know what I am doing
'org-babel-load-languages 'org-babel-load-languages
'((emacs-lisp . t) '((emacs-lisp . t)
(python . t) (python . t)
(scheme . t)
(shell . t))) (shell . t)))
#+end_src #+end_src
@ -850,6 +863,7 @@ Allow fast code insertion
(add-to-list 'org-structure-template-alist '("sh" . "src shell")) (add-to-list 'org-structure-template-alist '("sh" . "src shell"))
(add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp")) (add-to-list 'org-structure-template-alist '("el" . "src emacs-lisp"))
(add-to-list 'org-structure-template-alist '("py" . "src python")) (add-to-list 'org-structure-template-alist '("py" . "src python"))
(add-to-list 'org-structure-template-alist '("scm" . "src scheme"))
#+end_src #+end_src
** Capture Templates ** Capture Templates
@ -985,6 +999,26 @@ Allow fast code insertion
(no-delete-other-windows . t)))))) (no-delete-other-windows . t))))))
#+end_src #+end_src
** org roam server
#+begin_src emacs-lisp
(use-package websocket
:after org-roam)
(use-package simple-httpd
:after org-roam)
(use-package org-roam-ui
:straight (org-roam-ui
:type git
:host github
:repo "org-roam/org-roam-ui"
:files ("*.el" "out"))
:after org-roam ;; or :after org
:hook (org-roam . org-roam-ui-mode)
:config)
#+end_src
** Deft ** Deft
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package deft (use-package deft
@ -1005,10 +1039,13 @@ Allow fast code insertion
* Development * Development
** General ** General
*** Colored Brackets (rainbow delimiters) *** Brackets setup
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package rainbow-delimiters (use-package rainbow-delimiters
:hook (prog-mode . rainbow-delimiters-mode)) :hook (prog-mode . rainbow-delimiters-mode)
(prog-mode . show-paren-mode)
;; (prog-mode . electric-pair-mode)
)
#+end_src #+end_src
*** Projectile *** Projectile
@ -1324,7 +1361,9 @@ Better Diff in header sizes
*** Scheme (guile) *** Scheme (guile)
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package geiser) (use-package geiser
:bind
([remap eval-last-sexp] . geiser-eval-last-sexp))
(use-package geiser-guile) (use-package geiser-guile)
#+end_src #+end_src
@ -1349,15 +1388,30 @@ Better Diff in header sizes
** Vterm ** Vterm
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package vterm (use-package vterm
:defer t :defer 3
:ensure t) :ensure t)
#+end_src #+end_src
** Elfeed org
#+begin_src emacs-lisp
(use-package elfeed-dashboard
:config
;; (setq elfeed-dashboard-file "~/Documents/private.el/elfeed-dashboard.org")
;; update feed counts on elfeed-quit
(advice-add 'elfeed-search-quit-window :after #'elfeed-dashboard-update-links))
(use-package elfeed-org
:commands elfeed
:hook (elfeed . elfeed-org)
:config)
;; (setq rmh-elfeed-org-files (list "~/Documents/private.el/elfeed.org"))
#+end_src
** ranger ** ranger
#+begin_src emacs-lisp #+begin_src emacs-lisp
(use-package ranger (use-package ranger
:defer t :defer 3
:config (ranger-override-dired-mode t)) :config (ranger-override-dired-mode t))
#+end_src #+end_src
@ -1366,7 +1420,8 @@ Better Diff in header sizes
(let ((ligatures `((?- . ,(regexp-opt '("-|" "-~" "---" "-<<" "-<" "--" "->" "->>" "-->"))) (let ((ligatures `((?- . ,(regexp-opt '("-|" "-~" "---" "-<<" "-<" "--" "->" "->>" "-->")))
(?/ . ,(regexp-opt '("/**" "/*" "///" "/=" "/==" "/>" "//"))) (?/ . ,(regexp-opt '("/**" "/*" "///" "/=" "/==" "/>" "//")))
(?* . ,(regexp-opt '("*>" "***" "*/"))) ;; (?* . ,(regexp-opt '("*>" "***" "*/")))
(?* . ,(regexp-opt '("*>" "*/")))
(?< . ,(regexp-opt '("<-" "<<-" "<=>" "<=" "<|" "<||" "<|||::=" "<|>" "<:" "<>" "<-<" (?< . ,(regexp-opt '("<-" "<<-" "<=>" "<=" "<|" "<||" "<|||::=" "<|>" "<:" "<>" "<-<"
"<<<" "<==" "<<=" "<=<" "<==>" "<-|" "<<" "<~>" "<=|" "<~~" "<~" "<<<" "<==" "<<=" "<=<" "<==>" "<-|" "<<" "<~>" "<=|" "<~~" "<~"
"<$>" "<$" "<+>" "<+" "</>" "</" "<*" "<*>" "<->" "<!--"))) "<$>" "<$" "<+>" "<+" "</>" "</" "<*" "<*>" "<->" "<!--")))