@@ -214,7 +214,7 @@
   (defun use-variable-fonts ()
     (interactive)
     (variable-pitch-mode)
-    (setq cursor-type 'bar))
+    (setq cursor-type '(bar . 1)))
 
   (defun ap/set-fonts (mono-face mono-font-size variable-face variable-font-size antialias &optional new-line-spacing)
     (if (boundp 'ns-antialias-text)
@@ -1807,6 +1807,14 @@ :defer 20
   :config (progn
             (setq org-journal-date-format "%A, %d %B %Y"
                   org-journal-dir "~/Sync/Default/Documents/journal")
+
+            (define-hook-helper org-journal-mode ()
+              (use-variable-fonts)
+              (text-scale-adjust 4)
+              (if smartparens-strict-mode
+                  (smartparens-strict-mode -1))
+              (if show-smartparens-mode
+                  (show-smartparens-mode -1)))
             (defun org-journal-display-entry-yesterday ()
               "Show org-journal entry for yesterday"
               (interactive)