 
 (defun elfeed-log (level fmt &rest objects)
   (let ((log-buffer (get-buffer-create "*elfeed-log*"))
-        (log-level-face (cond ((eq level 'info) 'elfeed-log-info-level-face)
-                              ((eq level 'warn) 'elfeed-log-warn-level-face)
-                              ((eq level 'error) 'elfeed-log-error-level-face))))
+        (log-level-face (cond
+                         ((eq level 'info) 'elfeed-log-info-level-face)
+                         ((eq level 'warn) 'elfeed-log-warn-level-face)
+                         ((eq level 'error) 'elfeed-log-error-level-face))))
     (with-current-buffer log-buffer
       (goto-char (point-max))
-      (insert (format (concat "[" (propertize "%s" 'face 'elfeed-log-date-face) "] "
-                              "[" (propertize "%s" 'face log-level-face) "]: %s\n")
-                      (format-time-string "%Y-%m-%d %H:%M:%S")
-                      level
-                      (apply #'format fmt objects))))))
+      (insert
+       (format
+        (concat "[" (propertize "%s" 'face 'elfeed-log-date-face) "] "
+                "[" (propertize "%s" 'face log-level-face) "]: %s\n")
+        (format-time-string "%Y-%m-%d %H:%M:%S")
+        level
+        (apply #'format fmt objects))))))
 
 ;;;###autoload
 (defun elfeed-update ()
   "Update all the feeds in `elfeed-feeds'."
   (interactive)
-  (elfeed-log 'info "Elfeed update: %s" (format-time-string "%B %e %Y %H:%M:%S %Z"))
+  (elfeed-log 'info "Elfeed update: %s"
+              (format-time-string "%B %e %Y %H:%M:%S %Z"))
   (mapc #'elfeed-update-feed (elfeed--shuffle (elfeed-feed-list)))
   (elfeed-search-update :force)
   (elfeed-db-save))

                    (id (or link (elfeed-generate-id description)))
                    (full-id (cons feed-id (elfeed-cleanup id)))
                    (original (elfeed-db-get-entry full-id))
                    (db-entry (elfeed-entry--create
                               :title (elfeed-cleanup title)
                               :id full-id
                               :feed-id feed-id
                               :link (elfeed-cleanup link)
                               :tags (elfeed-normalize-tags autotags elfeed-initial-tags)
                               :date (if (and original (null date))
                                         (elfeed-entry-date original)
                                       (elfeed-float-time date))
                               :content description
                               :content-type 'html)))
               (cl-loop for hook in elfeed-new-entry-parse-hook
                        do (funcall hook :rss1.0 item db-entry))
               db-entry))))

(defun elfeed-feed-list ()

                               :id full-id
                               :feed-id feed-id
                               :link (elfeed-cleanup link)
                               :tags tags
                               :date (if (and original (null date))
                                         (elfeed-entry-date original)
                                       (elfeed-float-time date))
                               :enclosures enclosures
                               :content description
                               :content-type 'html)))
               (dolist (hook elfeed-new-entry-parse-hook)
                 (funcall hook :rss item db-entry))
               db-entry))))

(defun elfeed-entries-from-rss1.0 (url xml)
