Sort guides up a bit

5 files changed, 0 insertions, 246 deletions

diff --git a/guides/emacs/AUCTeX.org b/guides/emacs/AUCTeX.org
deleted file mode 100644
index 0082759..0000000
--- a/guides/emacs/AUCTeX.org
+++ /dev/null
@@ -1,24 +0,0 @@
-* Completion for cross-references
-To integrate AUCTeX with reftex and get completion for ~\cite~
-(bibliography) and ~\ref~ (intra-document labels):
-#+begin_src elisp
-;; In init file:
-(put 'TeX-auto-save 'safe-local-variable 'booleanp)
-(put 'TeX-parse-self 'safe-local-variable 'booleanp)
-(add-hook 'LaTeX-mode-hook 'turn-on-reftex)
-(setq reftex-plug-into-AUCTeX t)
-(setq reftex-label-illegal-re "[^-a-zA-Z0-9_+=:;,./]")  ; Allow slashes.
-(setq TeX-auto-local ".auctex")
-
-;; Top-level .dir-locals.el:
-((latex-mode
-  . ((TeX-auto-save . t)
-     (TeX-parse-self . t)))
- (bibtex-mode
-  . ((TeX-auto-save . t)
-     (TeX-parse-self . t))))
-
-;; .dir-locals.el files in subfolders:
-((latex-mode
-  . ((TeX-master . "../path/to/main.tex"))))
-#+end_src
diff --git a/guides/emacs/development.org b/guides/emacs/development.org
deleted file mode 100644
index f1363e1..0000000
--- a/guides/emacs/development.org
+++ /dev/null
@@ -1,121 +0,0 @@
-* Build
-** bootstrapping
-Libraries that are part of the "bootstrap set" cannot rely on
-autoloading.  Example: =files.el= must ~(eval-when-compile (require
-'pcase))~, even though it only uses autoloaded macros.
-* Tests
-** Running
-Somehow I can never remember how to ask =make= how to run a specific
-set of tests.
-
-tl;dr, running =$testcases_regexp= from =test/$testfile.el=, to test
-changes in =lisp/$sourcefile.el=:
-#+begin_src sh
-make -C test $testfile \
-     TEST_LOAD_EL=yes \
-     TEST_BACKTRACE_LINE_LENGTH=nil \
-     SELECTOR="\"$testcases_regexp\"" \
-     EMACS_EXTRAOPT="-l ../lisp/$sourcefile.el"
-#+end_src
-
-Relevant bits from test/Makefile:
-
-#+begin_src makefile
-## filename.log: run tests from filename.el(c) if .log file needs updating
-## filename: re-run tests from filename.el(c), with no logging
-#+end_src
-
-#+begin_src makefile
-# Whether to run tests from .el files in preference to .elc, we do
-# this by default since it gives nicer stacktraces.
-# If you just want a pass/fail, setting this to no is much faster.
-export TEST_LOAD_EL ?= \
-    $(if $(findstring $(MAKECMDGOALS), all check check-maybe),no,yes)
-#+end_src
-
-#+begin_src makefile
-TEST_RUN_ERT = --batch --eval '(ert-run-tests-batch-and-exit (quote ${SELECTOR_ACTUAL}))' ${WRITE_LOG}
-#+end_src
-
-#+begin_src makefile
-ifdef SELECTOR
-SELECTOR_ACTUAL=$(SELECTOR)
-#+end_src
-
-Selector documentation from ~ert-select-tests~:
-#+begin_quote
-Valid SELECTORs:
-
-nil  -- Selects the empty set.
-t    -- Selects UNIVERSE.
-:new -- Selects all tests that have not been run yet.
-:failed, :passed       -- Select tests according to their most recent result.
-:expected, :unexpected -- Select tests according to their most recent result.
-a string -- A regular expression selecting all tests with matching names.
-a test   -- (i.e., an object of the ert-test data-type) Selects that test.
-a symbol -- Selects the test that the symbol names, signals an
-    ‘ert-test-unbound’ error if none.
-(member TESTS...) -- Selects the elements of TESTS, a list of tests
-    or symbols naming tests.
-(eql TEST) -- Selects TEST, a test or a symbol naming a test.
-(and SELECTORS...) -- Selects the tests that match all SELECTORS.
-(or SELECTORS...)  -- Selects the tests that match any of the SELECTORS.
-(not SELECTOR)     -- Selects all tests that do not match SELECTOR.
-(tag TAG) -- Selects all tests that have TAG on their tags list.
-    A tag is an arbitrary label you can apply when you define a test.
-(satisfies PREDICATE) -- Selects all tests that satisfy PREDICATE.
-    PREDICATE is a function that takes an ert-test object as argument,
-    and returns non-nil if it is selected.
-#+end_quote
-** Writing
-*** Mocking functions
-#+begin_src elisp
-(cl-letf (((symbol-function 'read-something)
-           (lambda (&rest _) "result")))
-  (some-command))
-#+end_src
-
-* Third-party packages
-** forge
-*** build
-Use =config.mk= to set =LOAD_PATH=:
-#+begin_src makefile
-find-lib = $(dir $(shell emacs -Q -batch                \
-	-eval "(require 'find-func)"                    \
-	-eval "(package-initialize)"                    \
-	-eval "(require '$(1))"                         \
-	-eval "(princ (find-library-name \"$(1)\"))"))
-
-sources = ~/src/emacs/magit/lisp
-
-elpa =                                          \
-	closql                                  \
-	compat                                  \
-	dash                                    \
-	emacsql                                 \
-	ghub                                    \
-	markdown-mode                           \
-	transient                               \
-	treepy                                  \
-	with-editor                             \
-	yaml
-elpa_dirs = $(foreach d,$(elpa),$(call find-lib,$(d)))
-
-LOAD_PATH = $(addprefix -L ,$(elpa_dirs) $(sources))
-#+end_src
-
-*** load sources
-~emacs -Q -L ./lisp~ does not seem to work: after running
-~(package-initialize)~, =M-x find-library forge= returns the instance
-installed under ~package-user-dir~.
-
-This can be circumvented with ~(setq pacakge-load-list '((forge nil)
-all))~.
-
-Full command line for easy startup:
-
-#+begin_src sh
-emacs -Q -L ./lisp \
-      -eval "(setq pacakge-load-list '((forge nil) all))" \
-      -f package-initialize \
-#+end_src
diff --git a/guides/emacs/elisp-demos.org b/guides/emacs/elisp-demos.org
deleted file mode 100644
index 029f5be..0000000
--- a/guides/emacs/elisp-demos.org
+++ /dev/null
@@ -1,28 +0,0 @@
-Some terse "context-free" Emacs Lisp snippets that hopefully speak for
-themselves.
-
-* The prefix argument
-#+begin_src elisp
-(defun my/prefix-arg-demo (arg)
-  (interactive (list current-prefix-arg))
-  (insert
-   (let ((num (prefix-numeric-value arg)))
-    (format "%s	%d	%s\n"
-           arg
-           num
-           (cond ((null arg)     "N/A")
-                 ((numberp arg)  (format "M-%d or C-u %d" arg arg))
-                 ((equal arg '-) (format "M-- or C-u -"))
-                 ((listp arg)
-                  (if (< num 0)
-                      (format "(M-- or C-u -) C-u × %d" (log (- num) 4))
-                    (format "C-u × %d" (log num 4)))))))))
-#+end_src
-#+begin_example
-nil	1	N/A
-2	2	M-2 or C-u 2
--	-1	M-- or C-u -
-(-16)	-16	(M-- or C-u -) C-u × 2
-(64)	64	C-u × 3
-#+end_example
-
diff --git a/guides/emacs/use-package.org b/guides/emacs/use-package.org
deleted file mode 100644
index f6cd027..0000000
--- a/guides/emacs/use-package.org
+++ /dev/null
@@ -1,48 +0,0 @@
-* Porting from ~custom-file~
-Some very dumb code to generate ~use-package~ declarations from Custom
-settings.  Entry point is ~c->us/port~.
-#+begin_src elisp
-(require 'help-fns)
-(require 'radix-tree)
-
-(defun c->us/get-custom-options ()
-  (seq-map
-   (pcase-lambda (`(theme-value ,option user ,value))
-     (list option value))
-   (get 'user 'theme-settings)))
-
-(defun c->us/get-option-file (option)
-  ;; Load packages first, otherwise symbol-file can return "loaddefs".
-  (pcase-dolist
-      (`(_ . ,files)
-       (radix-tree-prefixes (help-definition-prefixes)
-                            (symbol-name option)))
-    (dolist (f files)
-      (load f 'noerror 'nomessage)))
-  (when-let ((file (symbol-file option)))
-    (file-name-base file)))
-
-(defun c->us/write-declaration (lib pairs)
-  (insert (format "(use-package %s\n" lib))
-  (insert "  :custom")
-  (message "%s -> %s" lib pairs)
-  (pcase-dolist
-      (`(,option ,value) pairs)
-    (insert (format "\n  (%s %s)"
-                    option
-                    (prin1-to-string value))))
-  (insert ")\n\n"))
-
-(defun c->us/symbols< (symlist1 symlist2)
-  (string< (car symlist1) (car symlist2)))
-
-(defun c->us/port ()
-  (seq-map
-   (pcase-lambda (`(,lib . ,pairs))
-     (c->us/write-declaration lib pairs))
-   (sort (seq-group-by
-          (pcase-lambda (`(,option _))
-            (c->us/get-option-file option))
-          (sort (c->us/get-custom-options) 'c->us/symbols<))
-         'c->us/symbols<)))
-#+end_src
diff --git a/guides/emacs/windows.org b/guides/emacs/windows.org
deleted file mode 100644
index 06cad7e..0000000
--- a/guides/emacs/windows.org
+++ /dev/null
@@ -1,25 +0,0 @@
-=nt/INSTALL.w64= provides detailed instructions for compiling Emacs on
-recent Windows versions.  Here are some additional steps I had to
-figure out on my own:
-* Mingw-w64
-- Set =$HOME= to =%HOMEPATH%= by changing =db_home= to =windows= in
-  =c:/msys64/etc/fstab=.
-- In addition to =c:\msys64\mingw64\bin=, adding =c:\msys64\usr\bin=
-  to the system =PATH= allows Emacs to access applications installed
-  with =pacman=.
-  - It's not obvious whether the Mingw-w64 =PATH= entries should go
-    last (in which case Emacs will pick the wrong ~find~ command) or
-    first (in which case… /everything else/ will pick the wrong ~find~
-    command?).  At least Emacs has a variable to configure
-    (~find-program~).
-* Compiling
-Make sure to specify ~-c core.autocrlf=false~ *when cloning* the Emacs
-repository; ~autogen.sh~ gets confused otherwise.
-* Configuring
-AFAICT one must set the variable ~shell-file-name~ explicitly to
-=c:/msys64/usr/bin/bash.exe=, otherwise Emacs's Windows-specific
-initialization logic uses a built-in shell ersatz (=nt/cmdproxy.c=).
-** TODO =HOME=
-Went with the instructions from [[info:emacs#MS-Windows Registry]]; could
-maybe use [[info:emacs#Windows HOME]] by setting =HOME= to =%HOMEPATH%=,
-to avoid having to spell out my username?