diff --git a/org-publish.el b/org-publish.el
index d601e83f..9f040524 100644
--- a/org-publish.el
+++ b/org-publish.el
@@ -74,7 +74,7 @@
                    (directory-files "~/docs/site/content/teaching" t ".*.org$")))
            (counter 0))
       (cl-loop for file in files and index from 0
-               do (let ((func `(lambda ()
+               do (let* ((func `(lambda ()
                                  (setq lexical-binding t)
                                  (require 's)
                                  (require 'org)
@@ -83,6 +83,8 @@
                                  (require 'htmlize)
                                  (require 'denote)
                                  (require 'denote-org)
+                                 (setq find-file-hook '())
+                                 (setq org-mode-hook '())
                                  (with-current-buffer (find-file ,file)
                                    (re-search-forward "EXPORT_FILE_NAME" nil t)
                                    (beginning-of-line)
@@ -142,6 +144,54 @@
     (cl-loop for file in files
              do (insert (denote--link-get-description file)))))
 
+(let ((func (lambda ()
+               (let ((lexical-binding t)
+                     (find-file-hook '())
+                     (gc-cons-threshold 50000000)
+                     (org-mode-hook '()))
+                 (require 's)
+                 (require 'org)
+                 (require 'ox)
+                 (require 'ox-html)
+                 (require 'htmlize)
+                 (require 'denote)
+                 (require 'denote-org)
+                 (with-current-buffer (find-file "/home/chris/docs/site/content/teaching/20260311T141831--zealots-and-cripples__lesson_project_tfc.org")
+                   (re-search-forward "EXPORT_FILE_NAME" nil t)
+                   (beginning-of-line)
+                   (let* ((export-line (delete-and-extract-region
+                                        (line-beginning-position) (line-end-position)))
+                          (create-lockfiles nil)
+                          (org-export-with-broken-links 'mark)
+                          (org-export-with-section-numbers nil)
+                          (org-html-html5-fancy t)
+                          (org-html-validation-link nil)
+                          (make-backup-files nil)
+                          (org-export-with-title t)
+                          (org-html-head-include-default-style nil)
+                          (org-html-head "<link rel=\"stylesheet\" href=\"../static/pico.snazzy.css\">")
+                          (denote-directory "/home/chris/docs/site/content")
+                          (export-directory
+                           (concat "/home/chris/"
+                                   "docs/site/public/"
+                                   (if (s-contains? "content/teaching" "/home/chris/docs/site/content/teaching/20260311T141831--zealots-and-cripples__lesson_project_tfc.org")
+                                       "teaching/"
+                                     "notes/")))
+                          (html-file (concat export-directory
+                                             (org-export-output-file-name ".html")))
+                          (org-export-coding-system org-html-coding-system))
+                     (denote-org-convert-links-to-file-type)
+                     (widen)
+                     (org-update-all-dblocks)
+                     (message "%s" html-file)
+                     (replace-string-in-region "../site/content/" "./"
+                                               (point-min) (point-max))
+                     (org-export-to-file 'html html-file)
+                     (insert export-line)   
+                     (save-buffer)
+                     (kill-buffer)))))))
+  (save-excursion
+    (funcall func)))
 ;; (add-to-list 'org-dynamic-block-alist '("chris-site-notes" . chris/website-dynamic-block))
 
 ;; (setq org-publish-project-alist