diff --git a/README.org b/README.org
index c9cb2f61..2a6c89df 100644
--- a/README.org
+++ b/README.org
@@ -893,10 +893,10 @@ Let's start by creating a self contained function of what I'd like started on ev
 
   ;; changing height and boldness
   (dolist (face
-           '((org-level-1 1.4 ultra-bold)
-             (org-level-2 1.2 extra-bold)
-             (org-level-3 1.1 bold)
-             (org-level-4 1.0 semi-bold)
+           '((org-level-1 1.6 ultra-bold)
+             (org-level-2 1.4 extra-bold)
+             (org-level-3 1.2 bold)
+             (org-level-4 1.1 semi-bold)
              (org-level-5 1.0 normal)
              (org-column 1.0 normal)))
     (set-face-attribute (nth 0 face) nil :weight (nth 2 face) :height (nth 1 face)))
diff --git a/init.el b/init.el
index e71b1cd0..0f3127d6 100644
--- a/init.el
+++ b/init.el
@@ -596,10 +596,10 @@
 
   ;; changing height and boldness
   (dolist (face
-           '((org-level-1 1.4 ultra-bold)
-             (org-level-2 1.2 extra-bold)
-             (org-level-3 1.1 bold)
-             (org-level-4 1.0 semi-bold)
+           '((org-level-1 1.6 ultra-bold)
+             (org-level-2 1.4 extra-bold)
+             (org-level-3 1.2 bold)
+             (org-level-4 1.1 semi-bold)
              (org-level-5 1.0 normal)
              (org-column 1.0 normal)))
     (set-face-attribute (nth 0 face) nil :weight (nth 2 face) :height (nth 1 face)))
diff --git a/org-publish.el b/org-publish.el
index c3fcc6ff..9f5db33f 100644
--- a/org-publish.el
+++ b/org-publish.el
@@ -105,7 +105,7 @@
                                      (kill-buffer))))))
 
                     (setq counter (+ counter 1))
-                    (while (> counter 8)
+                    (while (> counter 10)
                       (sit-for 0.5))
                     (async-start
                      func