diff --git a/init.org b/init.org
index f492248..a042c7d 100644
--- a/init.org
+++ b/init.org
@@ -1,6 +1,6 @@
 #+TODO: TODO WIP WISH CLEANUP FIXME REVIEW |
 #+OPTIONS: use-property-inheritance:t
-#+PROPERTY: header-args :load yes :tangle init-org.el
+#+PROPERTY: header-args :load yes :tangle init-org.el :comments link
 
 =org-babel-tangle= takes nearly 27 seconds to tangle this file, at the time of writing. So for a brief while I used this sed script instead -
 # eval: (progn (make-local-variable 'after-save-hook) (add-hook 'after-save-hook (lambda () (start-process-shell-command "sed-tangle" "sed-tangle" "sed -n -e '/#+BEGIN_SRC emacs-lisp$/,/#+END_SRC$/{//!p;}' init.org > init.el"))))
@@ -92,10 +92,11 @@ This needs to be before =boon=/=exwm=, or you get a "failed to define function i
 #+END_SRC
 * exwm                                                             :disabled:
 :PROPERTIES:
+:literate-load: no
 :header-args: :load no :tangle no
 :END:
 
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :load no
 (setq exwm-input-global-keys
       '(([?\C-1] . select-window-1)
         ([?\C-2] . select-window-2)
@@ -121,7 +122,7 @@ This needs to be before =boon=/=exwm=, or you get a "failed to define function i
         ([?\s-v] . exwm-input-toggle-keyboard)))
 #+END_SRC
 Use window title for buffer names.
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :load no
 (require 'exwm)
 (add-hook 'exwm-update-title-hook
           (lambda ()
@@ -130,7 +131,7 @@ Use window title for buffer names.
 #+END_SRC
 ** Helpers
 A less repetitive way to start processes. Also enables Boon in the process buffer, so I can easy navigate it, copy text in it, or switch away from it.
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :load no
 (defun my-start-process (program &optional name &rest args)
   "Run PROGRAM with ARGS in buffer NAME."
   (interactive "P")
@@ -141,7 +142,7 @@ A less repetitive way to start processes. Also enables Boon in the process buffe
 #+END_SRC
 
 This is useful even without EXWM - switching does not work (...yet?), but I can launch apps via Hydra, and the output goes into the familiar environment of an Emacs buffer.
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :load no
 (defun my-start-app-or-switch (program &optional class-re title-re name &rest args)
   "Switch to EXWM buffer matching CLASS-RE or TITLE-RE, or run PROGRAM with ARGS.
 NAME is the name of the process and its buffer."
@@ -162,7 +163,7 @@ NAME is the name of the process and its buffer."
 #+END_SRC
 
 ** Startup programs
-#+BEGIN_SRC emacs-lisp
+#+BEGIN_SRC emacs-lisp :load no
 (my-start-process (expand-file-name "~/bin/kmonad") "kmonad" (expand-file-name "~/kmonad-tvs.kbd"))
 (my-start-process (expand-file-name "~/bin/kmonad") "kmonad" (expand-file-name "~/kmonad-legion.kbd"))
 (my-start-process "transmission-gtk")