   (if (file-readable-p "~/Dropbox/Notes")
       (setq deft-directory "~/Dropbox/Notes"))
   :general
-    ("<f4> n"     #'deft)
+  ("<f4> n"     #'deft)
   :init
   (setq deft-directory "~/Notes"   ; can be overridden in config
         deft-recursive t
         deft-use-filter-string-for-filename t
         deft-file-naming-rules '((nospace . "_")
-                                  (noslash . "_")
-                                  (case-fn . downcase))
-        ; first extension in list is used for new files.
+                                 (noslash . "_")
+                                 (case-fn . downcase))
+                                        ; first extension in list is used for new files.
         deft-extensions '("md" "txt" "text" "markdown" "mmd" "org")
-                                      ; deft auto-save interferes with whitespace-butler, so disable
+                                        ; deft auto-save interferes with whitespace-butler, so disable
         deft-auto-save-interval 0)
   (add-hook 'deft-mode-hook
             (lambda ()

;; will be in emacs.d/init-<prefix>-<ident>.el
(defun me:load-init-file (prefix ident)
  (let ((file-name (expand-file-name (concat "init-" prefix "-" (me:replace-all ident "/" "-") ".el") user-emacs-directory)))
  ;; (message "looking for %s" file-name)
  (when (file-exists-p file-name)
    ;; (message "loading %s" file-name)
    (load-file file-name))))

(me:load-init-file "system" (symbol-name system-type))
(me:load-init-file "host" (system-name))

              (with-current-buffer buffer
                (kill-local-variable 'mode-line-format)
                (force-mode-line-update t))))
        (buffer-list)))

;; Run programming mode hooks
;; This is used for modes which should trigger programming mode hooks
