Skip to content
Browse files

Remove dupes when it is useful, not after.

* mingus.el (mingus-add-podcast): `mingus-remove-dupes' was at the wrong point.
  • Loading branch information...
1 parent 4b0117d commit e22ebe65c4f25276c935af5c0090ddb7ed62cb7c @pft committed Sep 17, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 mingus.el
View
4 mingus.el
@@ -3097,8 +3097,8 @@ Actually it tries to retrieve any stream from a given url.
(or (cdr (assoc url mingus-podcast-alist))
(assoc url mingus-podcast-alist)
url)))))
- (streams (mingus-streams-from-podcast-with-regexp xml)))
- (mingus-remove-dupes (mapcar 'mingus-add streams)))))
+ (streams (mingus-remove-dupes (mingus-streams-from-podcast-with-regexp xml))))
+ (mapcar 'mingus-add streams))))
;; (defun mingus-streams-from-podcast (xmlstring)
;; (let ((xml

0 comments on commit e22ebe6

Please sign in to comment.
Something went wrong with that request. Please try again.