Fix confpkg

This commit is contained in:
Kiana Sheibani 2024-02-19 20:42:42 -05:00
parent 259795a98d
commit f02f4264a8
Signed by: toki
GPG key ID: 6CB106C25E86A9F7

View file

@ -1,8 +1,8 @@
#+title: Doom Emacs Config #+title: Doom Emacs Config
#+author: tokinanpa #+author: tokinanpa
#+email: kiana.a.sheibani@gmail.com #+email: kiana.a.sheibani@gmail.com
#+property: header-args :mkdirp yes :results silent :exports code :eval no-export #+property: header-args:elisp :results replace :exports code
#+property: header-args:shell :tangle "setup.sh" #+property: header-args :tangle no :results silent :eval no-export
* Introduction * Introduction
@ -106,9 +106,6 @@ for =confpkg= is below. It is mostly unchanged, aside from these tweaks:
- Change the package template to contain my information - Change the package template to contain my information
**** Confpkg :noexport: **** Confpkg :noexport:
:PROPERTIES:
:header-args: :tangle no :noweb yes :mkdirp yes :results silent :eval no-export
:END:
***** Preparation ***** Preparation
@ -125,14 +122,14 @@ for =confpkg= is below. It is mostly unchanged, aside from these tweaks:
#+end_src #+end_src
#+header: :tangle (expand-file-name (make-temp-name "emacs-org-babel-excuses/confpkg-prepare-") temporary-file-directory) #+header: :tangle (expand-file-name (make-temp-name "emacs-org-babel-excuses/confpkg-prepare-") temporary-file-directory)
#+begin_src emacs-lisp #+begin_src emacs-lisp :noweb no-export :export-embed no
<<confpkg-prepare()>> <<confpkg-prepare()>>
#+end_src #+end_src
***** Setup ***** Setup
#+name: confpkg-setup #+name: confpkg-setup
#+begin_src emacs-lisp :results silent #+begin_src emacs-lisp :results silent :noweb no-export
(setq confpkg--num 0 (setq confpkg--num 0
confpkg--list nil) confpkg--list nil)
@ -386,7 +383,7 @@ for =confpkg= is below. It is mostly unchanged, aside from these tweaks:
***** Confpkg Dispatch ***** Confpkg Dispatch
#+name: confpkg #+name: confpkg
#+begin_src emacs-lisp :var name="" needs="" after="" pre="" prefix="config-" via="copy" :results silent raw #+begin_src elisp :var name="" needs="" after="" pre="" prefix="config-" via="copy" :results silent raw :noweb no-export
;; Babel block for use with #+call ;; Babel block for use with #+call
;; Arguments: ;; Arguments:
;; - name, the name of the config sub-package ;; - name, the name of the config sub-package
@ -429,7 +426,7 @@ for =confpkg= is below. It is mostly unchanged, aside from these tweaks:
(cl-incf confpkg--num) (cl-incf confpkg--num)
(org-set-property (org-set-property
"header-args:emacs-lisp" "header-args:emacs-lisp"
(format ":tangle no :noweb-ref %s" confpkg-name)) (format ":noweb no-export :tangle no :noweb-ref %s" confpkg-name))
(push (list :name name (push (list :name name
:package confpkg-name :package confpkg-name
:file confpkg-file :file confpkg-file
@ -507,6 +504,18 @@ for =confpkg= is below. It is mostly unchanged, aside from these tweaks:
#+call: confpkg-quieter-output() #+call: confpkg-quieter-output()
***** CLI
#+begin_src emacs-lisp :tangle cli.el :noweb-ref none
;;; cli.el -*- lexical-binding: t; -*-
(setq org-confirm-babel-evaluate nil)
(defun doom-shut-up-a (orig-fn &rest args)
(quiet! (apply orig-fn args)))
(advice-add 'org-babel-execute-src-block :around #'doom-shut-up-a)
#+end_src
***** Timings ***** Timings
#+call: confpkg("Confpkg timings") #+call: confpkg("Confpkg timings")
@ -713,18 +722,6 @@ NODE defaults to the root node."
(pop-to-buffer buf))))) (pop-to-buffer buf)))))
#+end_src #+end_src
# CLI
#+begin_src emacs-lisp :tangle cli.el :noweb-ref none
;;; cli.el -*- lexical-binding: t; -*-
(setq org-confirm-babel-evaluate nil)
(defun doom-shut-up-a (orig-fn &rest args)
(quiet! (apply orig-fn args)))
(advice-add 'org-babel-execute-src-block :around #'doom-shut-up-a)
#+end_src
* Doom Modules * Doom Modules
One of Doom Emacs's most useful features is its modular configuration system, One of Doom Emacs's most useful features is its modular configuration system,
@ -732,7 +729,7 @@ allowing configuration code to be sectioned into modules that can be enabled or
customized individually. Doom provides a full suite of pre-written modules to customized individually. Doom provides a full suite of pre-written modules to
enable. enable.
#+begin_src emacs-lisp :tangle init.el :noweb no-export :noweb-ref none #+begin_src emacs-lisp :tangle init.el :noweb no-export
;;; init.el -*- lexical-binding: t; -*- ;;; init.el -*- lexical-binding: t; -*-
;; This file controls what Doom modules are enabled and what order they load in. ;; This file controls what Doom modules are enabled and what order they load in.
@ -1017,6 +1014,9 @@ This is mostly config settings that don't belong to any particular package and
aren't important enough to get their own major section. aren't important enough to get their own major section.
** Sensible Settings ** Sensible Settings
:PROPERTIES:
:header-args:emacs-lisp: :noweb no-export :tangle no :noweb-ref config-settings
:END:
#+call: confpkg("Settings") #+call: confpkg("Settings")
@ -1271,6 +1271,8 @@ only allow =RET= to be used if Company has been explicitly interacted with.
*** Spell Correction *** Spell Correction
#+call: confpkg("!Pkg company-spell")
I've been having problems with ~company-ispell~, mainly due to Ispell requiring a I've been having problems with ~company-ispell~, mainly due to Ispell requiring a
text-based dictionary (unlike Aspell, which uses a binary dictionary). So let's text-based dictionary (unlike Aspell, which uses a binary dictionary). So let's
switch to ~company-spell~: switch to ~company-spell~:
@ -1805,7 +1807,7 @@ makes that a bit too visually noisy.
And just to make sure nothing else accidentally starts running: And just to make sure nothing else accidentally starts running:
#+begin_src emacs-lisp :tangle packages.el #+begin_src emacs-lisp :tangle packages.el :noweb-ref none
(package! flycheck :disable t) (package! flycheck :disable t)
(package! flyspell :disable t) (package! flyspell :disable t)
#+end_src #+end_src
@ -2225,7 +2227,7 @@ doesn't mean everyone would have the time or patience to make it work.
org-startup-with-latex-preview t org-startup-with-latex-preview t
+org-startup-with-animated-gifs t +org-startup-with-animated-gifs t
org-format-latex-options ; Make latex preview smaller org-format-latex-options ; Make latex preview smaller
(plist-put org-format-latex-options :scale 0.55)) (plist-put org-format-latex-options :scale 0.55)
;; Todo Keywords ;; Todo Keywords
org-todo-keywords org-todo-keywords
@ -2245,7 +2247,7 @@ doesn't mean everyone would have the time or patience to make it work.
org-hide-leading-stars nil org-hide-leading-stars nil
org-superstar-item-bullet-alist '((42 . 8226) org-superstar-item-bullet-alist '((42 . 8226)
(43 . 8226) (43 . 8226)
(45 . 8226))) (45 . 8226))))
;; Bindings ;; Bindings
(map! :after org (map! :after org
@ -2264,7 +2266,6 @@ doesn't mean everyone would have the time or patience to make it work.
;; Map babel commands into localleader ;; Map babel commands into localleader
:desc "babel" :desc "babel"
"v" (lookup-key org-mode-map (kbd "C-c C-v"))) "v" (lookup-key org-mode-map (kbd "C-c C-v")))
#+end_src #+end_src
*** Project Links *** Project Links
@ -2535,7 +2536,7 @@ And we should also make it look a little prettier:
** Journal ** Journal
#+call: conpfkg("Org Journal") #+call: confpkg("Org Journal")
I don't use ~org-journal~ anymore, but I'm keeping my old configuration for it in I don't use ~org-journal~ anymore, but I'm keeping my old configuration for it in
case I want to go back. case I want to go back.