   (interactive)
   (let ((comint-buffer-maximum-size 0))
     (comint-truncate-buffer)))
+
+(use-package moody
+  :ensure t
+  :config
+  ;; Fixes mode line separator issues.
+  (validate-setq ns-use-srgb-colorspace nil)
+  (validate-setq x-underline-at-descent-line t)
+  (setq-default mode-line-format
+                '(""
+                  mode-line-front-space
+                  mode-line-mule-info
+                  mode-line-client
+                  mode-line-frame-identification
+                  mode-line-buffer-identification " " mode-line-position
+                  (vc-mode vc-mode)
+                  (multiple-cursors-mode mc/mode-line)
+                  " " mode-line-modes
+                  mode-line-end-spaces))
+  (use-package minions
+    :ensure t
+    :config
+    (minions-mode +1))
+  (moody-replace-mode-line-buffer-identification)
+  (moody-replace-vc-mode))
 
 ;; Wonderful weather forecast.
 ;; Disabling (needs login now).

  (csetq auto-revert-verbose nil)
  (global-auto-revert-mode))


;; Let auto-revert-mode update vc/git info.
;; Need it for mode-line-format to stay up to date.
;; See https://github.com/magit/magit/wiki/magit-update-uncommitted-buffer-hook

(use-package ar-ios-sim
  :after f dash)
(use-package ar-linux)
(use-package ar-objc
  :commands (ar/objc-import
             ar/objc-include))
