1.1--- a/emacs/lib/publish.el	Sun Jun 02 02:30:54 2024 -0400
     1.2+++ b/emacs/lib/publish.el	Sun Jun 02 19:23:41 2024 -0400
     1.3@@ -15,6 +15,13 @@
     1.4 
     1.5 (defvar html-foot "<footer><p>updated %C</p></footer>")
     1.6 
     1.7+;; (setq org-protocol-project-alist
     1.8+;;       '(("comp"
     1.9+;;          :base-url url
    1.10+;;          :working-directory project-dir
    1.11+;;          :online-suffix ".html"
    1.12+;;          :working-suffix ".org")))
    1.13+
    1.14 (setq org-html-style-default ""
    1.15       org-html-scripts ""
    1.16       org-html-htmlize-output-type 'css

     2.1--- a/lisp/std/readtable.lisp	Sun Jun 02 02:30:54 2024 -0400
     2.2+++ b/lisp/std/readtable.lisp	Sun Jun 02 19:23:41 2024 -0400
     2.3@@ -220,5 +220,3 @@
     2.4   ;; lambdas
     2.5   (:dispatch-macro-char #\# #\` #'|#`-reader|)
     2.6   (:dispatch-macro-char #\# #\f #'|#f-reader|))
     2.7-
     2.8-(std::in-readtable :std)