   (let ((map (make-sparse-keymap)))
     (prog1 map
       (define-key map "q" 'quit-window)
-      (define-key map "g" 'elfeed-search-update)
+      (define-key map "g" (elfeed-expose #'elfeed-search-update :force))
+      (define-key map "G" 'elfeed-update)
       (define-key map "b" 'elfeed-search-browse-url)
       (define-key map "y" 'elfeed-search-yank)
       (define-key map "u" (elfeed-expose #'elfeed-search-tag-all 'unread))

  (interactive)
  (switch-to-buffer (elfeed-buffer))
  (unless (eq major-mode 'elfeed-search-mode) (elfeed-search-mode))
  (elfeed-search-update))

(defun elfeed-search-format-date (date)
  "Format a date for printing in elfeed-search-mode."

        buffer-read-only t)
  (hl-line-mode)
  (make-local-variable 'elfeed-search-entries)
  (when (null elfeed-search-refresh-timer)
    (setf elfeed-search-refresh-timer
          (run-at-time elfeed-search-refresh-rate elfeed-search-refresh-rate
                       (apply-partially #'elfeed-search-update))))
  (add-hook 'kill-buffer-hook
            (lambda ()
              (message "killed timer?")
              (ignore-errors (cancel-timer elfeed-search-refresh-timer))
              (setf elfeed-search-refresh-timer nil))
            t t)
  (elfeed-search-update)
  (run-hooks 'elfeed-search-mode-hook))

