               ("http://www.modernemacs.com/index.xml" blog emacs ModernEmacs)
               ("http://www.msziyou.com/feed/" blog money ZiYou)
               ("http://www.sastibe.de/index.xml" blog emacs SebastianSchweer)
-              ("http://www.thisiscolossal.com/feed" blog Colossal)
+              ("http://www.thisiscolossal.com/feed" blog art Colossal)
               ("http://zzamboni.org/index.xml" blog hammerspoon dev Diego-Martín-Zamboni)
               ("https://affordanything.com/blog/feed" blog money AffordAnything)
               ("https://affordanything.com/comments/feed/" blog money AffordAnything)

    (mark-whole-buffer)
    (elfeed-search-untag-all-unread))

  (defun ar/elfeed-filter-count (search-filter)
    "Count results for SEARCH-FILTER."
    (let* ((filter (elfeed-search-parse-filter search-filter))
           (head (list nil))

    (activate-mark)
    (elfeed-search-untag-all-unread)
    (elfeed-search-update--force)
    (deactivate-mark)
    (goto-char (window-start)))

  ;; Going back to defaults for a little while.
  ;; (use-package elfeed-goodies :ensure t
  ;;   :after elfeed
  ;;   :config
  ;;   (ar/vsetq elfeed-goodies/entry-pane-position 'bottom)
  ;;   (ar/vsetq elfeed-goodies/feed-source-column-width 30)
  ;;   (ar/vsetq elfeed-goodies/tag-column-width 35)
  ;;   (elfeed-goodies/setup))

  (defun ar/elfeed-open-youtube-video ()
    (interactive)
