X-Git-Url: https://www.fleuret.org/cgi-bin/gitweb/gitweb.cgi?p=elisp.git;a=blobdiff_plain;f=media.el;h=d3809705825980b04205c40d984fcc6ae5d4a81b;hp=c2dd4e79114d5d084d80a53d8a42f425e39c64bc;hb=085b10679a6998fcd39acadb352747bb80aca955;hpb=18d001ce49a30194017396018d50a341286ea180 diff --git a/media.el b/media.el index c2dd4e7..d380970 100644 --- a/media.el +++ b/media.el @@ -620,9 +620,11 @@ returns nil if no id3 tags could be found." (title (or (and (consp c) (cdr c)) url))) (if (string-match "^\\(http\\|mms\\)://" url) (media/insert-url (cons url title) 0) - (if (file-regular-p url) (media/insert-file url 0) - (if (file-directory-p url) (media/insert-dir url 0) - (error "Unknown type `%s'" url)))))) + (if (file-exists-p url) + (if (file-regular-p url) (media/insert-file url 0) + (if (file-directory-p url) (media/insert-dir url 0) + (error "Unknown type `%s'" url)))) + ))) list)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;