Fix confpkg
This commit is contained in:
parent
259795a98d
commit
f02f4264a8
55
config.org
55
config.org
|
@ -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.
|
||||||
|
|
Loading…
Reference in a new issue