diff --git a/custom/dwpost.el b/custom/dwpost.el
index fa970fb..faeeba6 100644
--- a/custom/dwpost.el
+++ b/custom/dwpost.el
@@ -14,6 +14,10 @@
   (with-current-buffer newname
     (goto-line 1)
     (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 2)
+    (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 3)
+    (delete-region (line-beginning-position) (line-end-position))
     (write-file newname))
   (kill-buffer newname)
   (compose-mail "tobli+0397@post.dreamwidth.org" psubject)
@@ -42,6 +46,10 @@
   (with-current-buffer newname
     (goto-line 1)
     (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 2)
+    (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 3)
+    (delete-region (line-beginning-position) (line-end-position))
     (write-file newname))
   (kill-buffer newname)
   (compose-mail "tobli+0397@post.dreamwidth.org" psubject)
@@ -71,6 +79,10 @@
   (with-current-buffer newname
     (goto-line 1)
     (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 2)
+    (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 3)
+    (delete-region (line-beginning-position) (line-end-position))
     (write-file newname))
   (kill-buffer newname)
   (compose-mail "tobli+0397@post.dreamwidth.org" psubject)
@@ -100,6 +112,10 @@
   (with-current-buffer newname
     (goto-line 1)
     (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 2)
+    (delete-region (line-beginning-position) (line-end-position))
+    (goto-line 3)
+    (delete-region (line-beginning-position) (line-end-position))
     (write-file newname))
   (kill-buffer newname)
   (compose-mail "tobli+0397@post.dreamwidth.org" psubject)
diff --git a/init.el b/init.el
index db6a9c7..f3c34c8 100644
--- a/init.el
+++ b/init.el
@@ -352,7 +352,8 @@
   (load-file "~/.emacs.d/mail.el")
   (require 'mu4e)
   (setq send-mail-function 'smtpmail-send-it)
-  (load-file "~/.emacs.d/custom/dwpost.el"))
+  ;; (load-file "~/.emacs.d/custom/dwpost.el")
+  )
 
 ;; Aesthetics
 
@@ -409,6 +410,12 @@
 
 ;; Startup
 
+(defun load-directory (dir)
+  (let ((load-it (lambda (f)
+		   (load-file (concat (file-name-as-directory dir) f)))))
+    (mapc load-it (directory-files dir nil "\\.el$"))))
+(load-directory "~/.emacs.d/custom/")
+
 (setq initial-major-mode 'org-mode)
 
 (unless (iswin)