   (while (and elfeed-waiting
               (< (length elfeed-connections) elfeed-max-connections))
     (let ((request (pop elfeed-waiting)))
-      (destructuring-bind (id url cb) request
+      (destructuring-bind (_ url cb) request
         (push request elfeed-connections)
         (url-retrieve url cb)))))
 


(require 'cl)
(require 'xml)

(defgroup elfeed nil
  "An Emacs web feed reader."

    (setf elfeed-search-filter new-filter)
    (elfeed-search-update :force)))

(defun elfeed-goto-line (n)
  "Like `goto-line' but for non-interactive use."
  (goto-char (point-min))
  (forward-line (1- n)))

(defun elfeed-search-update (&optional force)
  "Update the display to match the database."
  (interactive)
