     (validate-setq zone-programs []))
 
   (use-package zone-words
-    :after zone
     :config
     (validate-setq zone-programs (vconcat [zone-words] zone-programs)))
 

  ;; Case-sensitive fold search search (ie. M-/ to autocomplete).
  (validate-setq dabbrev-case-fold-search nil))

(use-package ar-auto-correct
  :after (abbrev ispell))

(use-package ar-buffer
  :after (ar-process ar-string goto-addr url url-http)
  ;; No need to confirm killing buffers.
  :bind ([(control x) (k)] . kill-this-buffer))
(use-package ar-dired)
(use-package ar-file
  :after (ar-string simple))
(use-package ar-bazel)
(use-package ar-alist)
(use-package ar-git)
(use-package ar-helm
  :after helm)
(use-package ar-helm-objc
  :after (helm ar-file ar-helm ar-objc)
  :commands (ar/helm-objc-import-update))
(use-package ar-helm-projectile
  :bind ("<f7>" . ar/helm-projectile-shell-cd))
(use-package ar-helm-org
  :after (helm helm-org org))
(use-package ar-helm-shell
  :after (ar-helm ar-shell shell)
  :config
  (bind-key "M-r" #'ar/helm-shell-search-history shell-mode-map))
(use-package ar-helm-url
  :after helm)
(use-package ar-helm-hotspots-config
  :demand
  :after (ar-dired ar-helm-org ar-org helm-buffers)
  :bind (("C-x C-b" . ar/helm-hotspots)
         ("C-x b" . ar/helm-hotspots)))
(use-package ar-image
  :after (ar-buffer ar-string)
  :commands (ar/image-open-html-for-current-dir))
(use-package ar-imagemagick
  :after (ar-process cl))
(use-package ar-linux)
;; TODO: Migrate to a config module.
(use-package ar-mode-line
  :demand)
(use-package ar-objc
  :after (ar-buffer ar-file)
  :commands (ar/objc-import
             ar/objc-include))
(use-package ar-org
  :after (ar-file ar-time ar-buffer org))
(use-package ar-org-blog
  :after (ar-file ar-org ar-process)
  :commands (ar/org-blog-insert-image
             ar/org-blog-insert-resized-image))
(use-package ar-ping)
(use-package ar-shell
  :after (cl comint))
(use-package ar-sudo)
(use-package ar-url
  :after (ar-buffer ar-input enlive goto-addr)
  :commands (ar/url-view-links-at))
(use-package ar-osx
  :demand
  :commands (ar/osx-convert-plist-to-xml))
(use-package ar-platform
  :after (ar-osx ar-linux)
  :demand
  :bind (("C-x t" . ar/platform-new-browser-tab)))
(use-package ar-ox-html
  :after (org ox-html ar-file)
  :config
  (ar/ox-html-setup)
  :bind (:map org-mode-map

     (display-buffer ilog-buffer-name))))

(use-package abbrev
  :config
  (validate-setq abbrev-file-name "~/stuff/active/code/dots/emacs/abbrev_defs")
  (validate-setq save-abbrevs 'silently)
