From 5bd1fbf51ada41ac3f98e1b184d333af10528d10 Mon Sep 17 00:00:00 2001
From: AChavali <aryadevchavali1@gmail.com>
Date: Mon, 30 Dec 2019 23:26:29 +0000
Subject: ~config.org -> modules/config.org
config.el is a file that routes to the bin/config.el, and now config.org
is a module
---
doom.d/modules/config.org | 342 ++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 342 insertions(+)
create mode 100644 doom.d/modules/config.org
(limited to 'doom.d/modules')
diff --git a/doom.d/modules/config.org b/doom.d/modules/config.org
new file mode 100644
index 0000000..0428f49
--- /dev/null
+++ b/doom.d/modules/config.org
@@ -0,0 +1,342 @@
+#+TITLE: Oreodave's Emacs configuration
+#+AUTHOR: Oreodave
+#+DESCRIPTION: My Doom Emacs configuration!
+
+* Preclude
+This is my [[https://github.com/hlissner/doom-emacs][Doom Emacs]] configuration, which I try to use for as many things as
+possible. It is currently my main editor overall, literally overtaking my life.
+* Variables
+Bootstrapping literate module and setting up basic variables.
+** Bootstrap literate
+Load the literate.el file to start parsing.
+#+BEGIN_SRC elisp
+(load (expand-file-name (concat doom-private-dir "bin/literate.el")))
+#+END_SRC
+** Doom Variables
+#+BEGIN_SRC elisp
+(after! core-keybinds
+ (setq doom-localleader-key ",")
+ (setq doom-theme 'doom-molokai)
+ (setq doom-font (font-spec :family "Hack" :size 20)))
+#+END_SRC
+- Set the doom localleader to "," because it's faster
+- Using the font [[https://sourcefoundry.org/hack/][Hack]] with Fira code ligatures
+** Other variables
+#+BEGIN_SRC elisp
+(setq completion-ignore-case t)
+(setq truncate-lines t)
+(setq display-line-numbers-type nil)
+(display-battery-mode 1)
+(setq-default frame-title-format '("%b - εmacs"))
+(cl-pushnew '("Libgen" "https://libgen.me/search/all?search=%s") +lookup-provider-url-alist :key #'car)
+#+END_SRC
+Some quality of life things and others that I couldn't really put in one category
+- Displaying line numbers isn't usually something I do. If need be, I'll just
+ open them with *<SPC>tl*.
+- Set org directory
+- Add libgen to search providers
+- Looking at my battery percentage isn't very necessary but still really cool
+*
+* Internal Config
+** Projectile
+#+BEGIN_SRC elisp
+(after! projectile
+ (setq oreodave-tags-alist '("Makefile" "node_modules" "bin" "dist" "obj" "'*.json'"))
+ (defun oreodave/config/construct-tags ()
+ (reduce (lambda (x y) (concat x y)) (mapcar (lambda (i) (concat " --exclude=" i)) oreodave-tags-alist)
+ :initial-value "exctags -Re ")
+ )
+ (setq projectile-tags-command (oreodave/config/construct-tags))
+ (cl-pushnew "CMakeLists.txt" projectile-project-root-files :test #'string=)
+ (cl-pushnew "README.org" projectile-project-root-files :test #'string=)
+ (cl-pushnew "doc.org" projectile-project-root-files :test #'string=))
+#+END_SRC
+
+Really simple, just want to set projectile-tags-command when projectile has
+loaded, and easily add new ignores if necessary. Add a new ignore to the tags-alist.
+
+Add a few items to the projectile-root-files list
+** DAP
+#+BEGIN_SRC elisp
+(after! dap-mode
+ (defun oreodave/debug ()
+ (interactive)
+ (dap-ui-mode)
+ (dap-ui-locals)
+ (dap-ui-sessions))
+ (map!
+ :leader
+ :desc "Start debugging setup" "cD" #'oreodave/debug))
+#+END_SRC
+A keybind and a routine
+
+- Routine sets up the panes that I like to use, instead of having to M-x'ing it
+- *<SPC>cD* starts up the routine
+
+** Wakatime
+#+BEGIN_SRC elisp
+(use-package! wakatime-mode
+ :defer 1
+ :config
+ (setq wakatime-cli-path (expand-file-name "~/.local/bin/wakatime"))
+ (setq wakatime-api-key (password-store-get "Keys/Wakatime"))
+ (global-wakatime-mode +1))
+#+END_SRC
+Using new password holder (pass) to help with secure transactions. Doing all
+other stuff as well, cos Henrik may remove the Wakatime module.
+** Elfeed
+#+BEGIN_SRC elisp
+(after! elfeed
+ (defun oreodave/elfeed/load-feeds ()
+ (interactive)
+ (setq elfeed-feeds nil)
+ (elfeed-load-opml (concat org-directory "/elfeed.opml")))
+
+ (defun oreodave/elfeed/on-new-feed ()
+ (interactive)
+ (elfeed-org-export-opml)
+ (write-file (concat org-directory "/elfeed.opml"))
+ (kill-current-buffer))
+
+ (map!
+ (:map elfeed-search-mode-map
+ :localleader
+ :desc "Update feeds" "u" #'elfeed-update)
+ (:leader
+ :prefix "o"
+ :desc "Open RSS" "f" #'=rss))
+
+ (add-hook 'elfeed-org-new-entry-hook 'oreodave/elfeed/on-new-feed))
+#+END_SRC
+** Dashboard
+#+BEGIN_SRC elisp
+(defun doom-display-benchmark-h (&optional return-p)
+ "Display a benchmark, showing number of packages and modules, and how quickly
+they were loaded at startup.
+
+If RETURN-P, return the message as a string instead of displaying it."
+ (funcall (if return-p #'format #'message)
+ "εmacs loaded %d packages, %d modules in %.03fs"
+ (- (length load-path) (length doom--initial-load-path))
+ (if doom-modules (hash-table-count doom-modules) 0)
+ (or doom-init-time
+ (setq doom-init-time
+ (float-time (time-subtract (current-time) before-init-time))))))
+
+(setq fancy-splash-image "~/Pictures/space.png") ; splash image
+(setq +doom-dashboard-name "*dashboard*")
+
+(setq +doom-dashboard-functions ; limit the dashboard items
+ '(doom-dashboard-widget-banner
+ doom-dashboard-widget-shortmenu
+ doom-dashboard-widget-loaded))
+
+(setq +doom-dashboard-menu-sections ; Set a specific amount of items
+ '(("Open org-agenda"
+ :icon (all-the-icons-octicon "calendar" :face 'font-lock-keyword-face)
+ :when (fboundp 'org-agenda)
+ :action org-agenda)
+ ("Open books"
+ :icon (all-the-icons-octicon "book" :face 'font-lock-keyword-face)
+ :action oreodave/goto-books)
+ ("Check the weather"
+ :icon (all-the-icons-wicon "rain" :face 'font-lock-keyword-face)
+ :action oreodave/weather)
+ ("Jump to bookmark"
+ :icon (all-the-icons-octicon "bookmark" :face 'font-lock-keyword-face)
+ :action bookmark-jump)))
+#+END_SRC
+- Space image comes from [[https://flaticon.com][website]]
+- Remove the Github link to the official Doom Emacs repository: it's in muscle memory
+ at this point.
+- Added my own menu items:
+ - Books
+ - Weather
+* Language Config
+** C-style languages
+#+BEGIN_SRC elisp
+(after! cc-mode
+ (c-add-style "Allman"
+ '((c-basic-offset . 2)
+ (c-comment-only-line-offset . 0)
+ (c-hanging-braces-alist (brace-list-open)
+ (brace-entry-open)
+ (substatement-open after)
+ (block-close . c-snug-do-while)
+ (arglist-cont-nonempty))
+ (c-cleanup-list brace-else-brace)
+ (c-offsets-alist
+ (statement-block-intro . +)
+ (knr-argdecl-intro . 0)
+ (substatement-open . 0)
+ (substatement-label . 0)
+ (label . 0)
+ (statement-cont . +))))
+ (c-add-style "C#"
+ '((c-basic-offset . 4)
+ (c-comment-only-line-offset .0)
+ (c-hanging-braces-alist (brace-list-open)
+ (brace-entry-open)
+ (substatement-open after)
+ (block-close . c-snug-do-while)
+ (arglist-cont-nonempty))
+ (c-cleanup-list brace-else-brace)
+ (c-offsets-alist
+ (statement-block-intro . 0)
+ (knr-argdecl-intro . 0)
+ (substatement-open . 0)
+ (substatement-label . 0)
+ (statement-cont . +)
+ (label . 0)))))
+#+END_SRC
+Emacs doesn't have the full range of styles that I want, so lemme just do it myself.
+** CSharp
+#+BEGIN_SRC elisp
+(after! csharp-mode
+ (setq omnisharp-server-executable-path "~/bin/omnisharp-roslyn/run")
+ (defun oreodave/csharp/get-unit-test-in-project ()
+ "Unit test anywhere using CTags or ETags and C#"
+ (interactive)
+ (let* ((tags-file (counsel-etags-locate-tags-file))
+ (cands (counsel-etags-collect-cands "void.*Test" t buffer-file-name))) ; void.*Test assumes your tests are using something like XUnit and end with Test
+ (ivy-read
+ "Choose test: "
+ cands
+ :action
+ (lambda (item)
+ ;; From the counsel-etags file-open-api function
+ (when (string-match "\\`\\(.*?\\):\\([0-9]+\\):\\(.*\\)\\'" item)
+ (let*
+ ((file (match-string-no-properties 1 item))
+ (linenum (match-string-no-properties 2 item))
+ ;; always calculate path relative to TAGS
+ (default-directory (counsel-etags-tags-file-directory)))
+
+ (counsel-etags-push-marker-stack (point-marker))
+ (find-file file)
+ (counsel-etags-forward-line linenum)
+ (omnisharp-unit-test-at-point))))
+ :caller 'oreodave/csharp/get-unit-tests-in-project)))
+
+ (add-hook! 'csharp-mode-hook
+ '(lambda()
+ (omnisharp-mode)
+ (c-set-style "C#"))) ; Hook for csharp setting variables
+
+ (map! ; CSharp Keybinds
+ :map csharp-mode-map
+ :localleader
+ :desc "Format buffer" "=" #'omnisharp-code-format-entire-file
+ (:prefix "t"
+ :desc "Select Test in Project" "t" #'oreodave/csharp/get-unit-test-in-project)))
+ #+END_SRC
+
+- I have custom installed the omnisharp roslyn executable, so I'd rather use
+ that
+- C# code is better at 4 space indents, but I indent most of my C code at 2
+ space indents because it looks nicer :)
+- Implemented my own function which piggy backs counsel etags to globally search
+ tags for test specific context, then goes to it and uses an omnisharp test
+ command to unit test it. Basically global test search in C# projects. To use
+ this, just make sure you have tags compiled and that all your tests are
+ written as some public void *name* _Test (i.e. they are appended with _Test so
+ that the pattern can be matched)
+** Python
+#+BEGIN_SRC elisp
+(after! python
+ (setq python-version-checked t)
+ (setq python-python-command "python3")
+ (setq python-shell-interpreter "python3")
+ (setq flycheck-python-pycompile-executable "python3")
+
+ (map! ; Python keybinds
+ :map python-mode-map
+ :localleader
+ :desc "Start python minor" "c" #'run-python
+ :desc "Format buffer" "=" #'py-yapf-buffer
+ (:prefix "s"
+ :desc "Send region REPL" "r" #'python-shell-send-region
+ :desc "Send buffer" "b" #'python-shell-send-buffer
+ :desc "Send function" "f" #'python-shell-send-defun)))
+#+END_SRC
+- I do python development for Python3, so I need to set the flycheck python checker, as well as the interpreter, to be Python3
+- Most of my python work is in scripts or ideas, so I don't need extensive testing utilities or anything like that
+- I run my python code a LOT and thus need commands for sending bits or whole scripts into the REPL
+** TypeScript
+#+BEGIN_SRC elisp
+(after! typescript-mode
+ (setq typescript-indent-level 2)
+ (setq tide-format-options '(:indentSize 2 :tabSize 2))
+ (after! lsp
+ (cl-pushnew '(typescript-mode . "typescript") lsp-language-id-configuration :key #'car)
+ (lsp-register-client
+ (make-lsp-client
+ :new-connection (lsp-stdio-connection "typescript-language-server --stdio")
+ :major-modes '(typescript-mode)
+ :server-id 'typescript))))
+#+END_SRC
+- Typescript (in my opinion) should be indented by 2
+- Setup the LSP server on the lsp-language-id-config in case it hasn't already
+* Keymap
+#+BEGIN_SRC elisp
+(map!
+ :leader
+ :desc "Compile via make" "cC" #'+make/run ; I compile stuff all the time
+ :desc "Shell command" "!" #'shell-command ; Better than M-!
+
+ (:prefix ("m" . "personal") ; Personal
+ :desc "Open books" "b" #'oreodave/goto-books ; I like my books
+ :desc "Open school dir" "s" #'oreodave/goto-school ; I like my schooling
+ :desc "Open weather" "w" #'oreodave/weather ; Nah I don't like the weather
+ :desc "Change theme" "t" #'oreodave/set-new-theme ; From my own collection
+ :desc "Reload emacs" "r" #'oreodave/reload) ; Reload is necessary
+
+ (:after counsel ; Counsel or ivy
+ :desc "M-x" "<SPC>" #'counsel-M-x ; Redefine as M-x because of my muscle memory with spacemacs
+ :desc "Find file here" "f." #'counsel-find-file ; Sometimes use this instead of <SPC>ff
+ (:prefix ("/" . "search")
+ :desc "FZF!" "f" #'counsel-fzf ; Just in case I need a counsel-ui for a gitignored directory
+ :desc "RipGrep!" "r" #'counsel-rg ; Ripgrep is faster than Ag in most cases and makes me feel cool
+ :desc "Search Tags" "t" #'counsel-etags-find-tag
+ :desc "List Tags" "T" #'counsel-etags-list-tag
+ :desc "Buffer Tags" "s" #'counsel-imenu
+ :desc "Lookup" "o" #'+lookup/online
+ :desc "Lookup select" "O" #'+lookup/online-select
+ :desc "Search buffer" "/" #'swiper-isearch)); is quicker to do than <SPC>/b, for something that is done so often
+
+ (:prefix ("w" . "window") ; Windows
+ :desc "Close window" "d" #'+workspace/close-window-or-workspace ; is slightly closer together than <SPC>wc
+ :desc "Switch window" "W" #'ace-window ; is also used in spacemacs so I'd rather use this
+ :desc "Swap windows" "S" #'ace-swap-window) ; allows me to switch windows more efficiently than before, better than just motions
+
+ (:prefix ("c" . "code") ; Code
+ :desc "Fold all in level" "f" #'hs-hide-level
+ (:after format-all
+ :desc "Format code" "=" #'format-all-buffer)
+ (:after lsp
+ :desc "Execute action" "a" #'lsp-execute-code-action))
+
+ (:prefix ("b" . "buffers") ; Buffers
+ :desc "Close buffer" "d" #'doom/kill-this-buffer-in-all-windows)
+
+ (:after projectile
+ :desc "Switch to p-buffer" ">" #'projectile-switch-to-buffer ; Opposing <SPC>< which counsel's all buffers
+ (:prefix ("p" . "project")
+ :desc "Regen tags" "g" #'projectile-regenerate-tags
+ :desc "Open project files" "f" #'projectile-find-file))
+
+ (:prefix ("z" . "font") ; Fonts
+ :desc "Increase font" "+" #'doom/increase-font-size
+ :desc "Decrease font" "-" #'doom/decrease-font-size
+ :desc "Adjust font" "z" #'text-scale-adjust)
+
+ (:prefix ("F" . "frame") ; Frames
+ :desc "Kill frame" "d" #'delete-frame
+ :desc "Current buffer frame" "m" #'make-frame
+ :desc "Choose Buffer frame" "n" #'display-buffer-other-frame
+ :desc "Switch frames" "o" #'other-frame)
+
+ (:prefix ("o" . "open")
+ :after org
+ :desc "Calendar" "c" #'=calendar))
+#+END_SRC
--
cgit v1.2.3-13-gbd6f