From f4a62a983d72d23ab5a87b92da23fcbd7294842c Mon Sep 17 00:00:00 2001
From: Leni Aniva <v@leni.sh>
Date: Sun, 9 Jun 2024 00:39:49 -0700
Subject: [PATCH] feat: Add telegram, scad, cov modes. Fix conflict

---
 doom/config.org | 87 +++++++++++++++++++++++++++++++++++++++++++++++++
 doom/init.el    |  2 +-
 2 files changed, 88 insertions(+), 1 deletion(-)

diff --git a/doom/config.org b/doom/config.org
index 32ffb8d..f74c600 100644
--- a/doom/config.org
+++ b/doom/config.org
@@ -261,6 +261,23 @@ numbers are disabled. For relative line numbers, set this to ~relative~.
 (add-hook 'text-mode-hook #'custom/common-richtext-hook)
 #+end_src
 
+** Shells
+
+#+begin_quote
+Fish (and possibly other non-POSIX shells) is known to inject garbage
+output into some of the child processes that Emacs spawns. Many Emacs
+packages/utilities will choke on this output, causing unpredictable
+issues.
+#+end_quote
+
+Here we set the default shell to ~bash~ but the vterm shell to the system
+~$SHELL~ variable.
+
+#+begin_src emacs-lisp
+(setq shell-file-name (executable-find "bash"))
+(setq vterm-shell (getenv "SHELL"))
+#+end_src
+
 * Package-specific Settings
 
 ** Editor
@@ -344,6 +361,12 @@ Note that ~onsave~ was intentionally turned off because it messes with version c
 		:files ("highlighting/emacs/*.el")))
 #+end_src
 
+*** Cov
+
+#+begin_src emacs-lisp :tangle packages.el
+(package! cov)
+#+end_src
+
 *** Emacs Lisp
 
 #+begin_src emacs-lisp
@@ -620,6 +643,47 @@ Add the necessary hooks for LilyPond mode.
 	(setq rustic-indent-offset standard-indent))
 #+end_src
 
+*** SCAD
+
+#+begin_src emacs-lisp :tangle packages.el
+(package! scad-mode)
+#+end_src
+
+#+begin_src emacs-lisp
+(use-package! scad-mode
+	:after-call scad-mode
+	:config
+		(add-hook 'scad-mode-hook  #'custom/common-program-hook))
+(map! :after scad-mode
+	:localleader
+	:map scad-mode-map
+	:desc "Open"               "o" #'scad-open
+	:desc "Export"             "e" #'scad-export
+	:desc "Preview"            "p" #'scad-preview
+	)
+(map! :after scad-mode
+	:mode scad-preview-mode
+	:map scad-preview-mode-map
+	:desc "Size+"              "+" #'scad-preview-size+
+	:desc "Size-"              "-" #'scad-preview-size-
+	:desc "Distance+"          "[" #'scad-preview-distance+
+	:desc "Distance-"          "]" #'scad-preview-distance-
+	:desc "Toggle Projection"  "p" #'scad-preview-projection
+	:desc "Translate x-"       "h" #'scad-preview-translate-x-
+	:desc "Translate x+"       "l" #'scad-preview-translate-x+
+	:desc "Translate y-"       "j" #'scad-preview-translate-y-
+	:desc "Translate y+"       "k" #'scad-preview-translate-y+
+	:desc "Translate z-"       "n" #'scad-preview-translate-z-
+	:desc "Translate z+"       "m" #'scad-preview-translate-z+
+	:desc "Rotate x-"          "H" #'scad-preview-rotate-x-
+	:desc "Rotate x+"          "L" #'scad-preview-rotate-x+
+	:desc "Rotate y-"          "J" #'scad-preview-rotate-y-
+	:desc "Rotate y+"          "K" #'scad-preview-rotate-y+
+	:desc "Rotate z-"          "N" #'scad-preview-rotate-z-
+	:desc "Rotate z+"          "M" #'scad-preview-rotate-z+
+	)
+#+end_src
+
 ** Tools
 
 *** Language Server Protocol (LSP)
@@ -758,3 +822,26 @@ FIXME: Cleanup ~ein:markdown-mode-map~.
 	:desc "Move cell up"    "M-k" 'ein:worksheet-move-cell-up
 )
 #+end_src
+
+*** Telegram
+
+#+begin_src emacs-lisp :tangle packages.el
+(package! telega)
+#+end_src
+
+On Arch Linux, ~telegram-tdlib~ installs to
+#+begin_src text :tangle no
+telegram-tdlib /usr/
+telegram-tdlib /usr/include/
+telegram-tdlib /usr/include/td/...
+telegram-tdlib /usr/lib/
+telegram-tdlib /usr/lib/cmake/
+telegram-tdlib /usr/lib/cmake/...
+telegram-tdlib /usr/lib/libtdactor.a
+telegram-tdlib /usr/lib/...
+telegram-tdlib /usr/lib/pkgconfig/...
+#+end_src
+
+#+begin_src emacs-lisp
+(setq telega-server-libs-prefix "/usr")
+#+end_src
diff --git a/doom/init.el b/doom/init.el
index d6bd096..c67494a 100644
--- a/doom/init.el
+++ b/doom/init.el
@@ -24,7 +24,7 @@
        company           ; the ultimate code completion backend
        ;;helm              ; the *other* search engine for love and life
        ;;ido               ; the other *other* search engine...
-       ivy               ; a search engine for love and life
+       ;;ivy               ; a search engine for love and life
        vertico           ; the search engine of the future
 
        :ui