Reorder unconditional settings

1 files changed, 34 insertions, 32 deletions

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 7724987..5199005 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -823,15 +823,45 @@ If no direction is given, don't split."
 (defalias 'yes-or-no-p 'y-or-n-p)
 (defalias 'dabbrev-expand 'hippie-expand)
 
+;;;; Unconditional settings
+
+(setq gnus-init-file "~/.emacs.d/site-lisp/gnus-init")
+
+(set-fontset-font "fontset-default" 'unicode
+                  (font-spec :family "Liberation Mono"
+                             :width 'normal
+                             :size 12.4
+                             :weight 'normal))
+
+(setq-default bidi-paragraph-direction 'left-to-right)
+(setq-default tab-width 4)
+(setq-default indent-tabs-mode nil)
+(setq-default truncate-lines t)
+(setq custom-file "~/.emacs.d/custom.el")
+(setq default-frame-alist
+      `((border-width . 0)
+        (internal-border-width . 0)
+        (vertical-scroll-bars . nil)
+        (menu-bar-lines . nil)
+        (tool-bar-lines . nil)
+        (font . "Cosmic Sans Neue Mono:pixelsize=17")))
+(setq frame-title-format '(:eval (concat "emacs: " (buffer-name))))
+(setq message-log-max 1000)
+(setq redisplay-dont-pause t)
+(setq use-dialog-box nil)
+(setq user-full-name "Tom Willemse")
+(setq window-combination-resize t)
+(setq scroll-preserve-screen-position t)
+
+;; Can't be put in an eval-after-load or such because by then it will
+;; be too late.
+(setq elnode-do-init nil)
+
 ;;;; uniquify
 
 (stante-after uniquify
   (setq uniquify-buffer-name-style 'post-forward))
 
-;;;; gnus
-
-(setq gnus-init-file "~/.emacs.d/site-lisp/gnus-init")
-
 ;;;; Visual cues
 
 (turn-off menu-bar-mode scroll-bar-mode tool-bar-mode blink-cursor-mode
@@ -872,12 +902,6 @@ If no direction is given, don't split."
           (clisp ("clisp") :coding-system utf-8-unix))
         slime-default-lisp 'sbcl))
 
-(set-fontset-font "fontset-default" 'unicode
-                  (font-spec :family "Liberation Mono"
-                             :width 'normal
-                             :size 12.4
-                             :weight 'normal))
-
 (stante-after simple
   (define-key special-mode-map "z" #'kill-this-buffer))
 
@@ -1242,29 +1266,7 @@ If no direction is given, don't split."
   ((vala) oni:vala-mode-func))
 
 
-(setq-default bidi-paragraph-direction 'left-to-right)
-(setq-default tab-width 4)
-(setq-default indent-tabs-mode nil)
-(setq-default truncate-lines t)
-(setq custom-file "~/.emacs.d/custom.el")
-(setq default-frame-alist
-      `((border-width . 0)
-        (internal-border-width . 0)
-        (vertical-scroll-bars . nil)
-        (menu-bar-lines . nil)
-        (tool-bar-lines . nil)
-        (font . "Cosmic Sans Neue Mono:pixelsize=17")))
-(setq frame-title-format '(:eval (concat "emacs: " (buffer-name))))
-(setq message-log-max 1000)
-(setq redisplay-dont-pause t)
-(setq use-dialog-box nil)
-(setq user-full-name "Tom Willemse")
-(setq window-combination-resize t)
-(setq scroll-preserve-screen-position t)
 (add-to-list 'debug-ignored-errors "^Can't shift all lines enough")
-;; Can't be put in an eval-after-load or such because by then it will
-;; be too late.
-(setq elnode-do-init nil)
 
 (enable '(downcase-region narrow-to-page narrow-to-region scroll-left
           upcase-region))