diff --git a/custom/dwpost.el b/custom/dwpost.el
index aab92dc..0a421b8 100644
--- a/custom/dwpost.el
+++ b/custom/dwpost.el
@@ -1,5 +1,12 @@
 (defun dwpost (psubject)
   (interactive "MPost title (REQUIRED): ")
+  (setq org-export-with-author 'nil)
+  (setq org-export-with-creator 'nil)
+  (setq org-export-with-date 'nil)
+  (setq org-export-with-section-numbers 'nil)
+  (setq org-export-time-stamp-file 'nil)
+  (setq org-export-with-toc 'nil)
+  (setq org-html-validation-link 'nil)
   (org-html-export-to-html)
   (defvar newname (concat (file-name-base) ".html"))
   (find-file-noselect newname)
@@ -16,6 +23,13 @@
 
 (defun dwpost-public (psubject)
   (interactive "MPost title (REQUIRED): ")
+  (setq org-export-with-author 'nil)
+  (setq org-export-with-creator 'nil)
+  (setq org-export-with-date 'nil)
+  (setq org-export-with-section-numbers 'nil)
+  (setq org-export-time-stamp-file 'nil)
+  (setq org-export-with-toc 'nil)
+  (setq org-html-validation-link 'nil)
   (org-html-export-to-html)
   (defvar newname (concat (file-name-base) ".html"))
   (find-file-noselect newname)
diff --git a/init.el b/init.el
index 331e3f6..89f1741 100644
--- a/init.el
+++ b/init.el
@@ -350,13 +350,6 @@
   (load-file "~/mail.el")
   (require 'mu4e)
   (setq send-mail-function 'smtpmail-send-it)
-  (setq org-export-with-author 'nil)
-  (setq org-export-with-creator 'nil)
-  (setq org-export-with-date 'nil)
-  (setq org-export-with-section-numbers 'nil)
-  (setq org-export-time-stamp-file 'nil)
-  (setq org-export-with-toc 'nil)
-  (setq org-html-validation-link 'nil)
   (load-file "~/.emacs.d/custom/dwpost.el"))
 
 ;; Aesthetics