(defgroup media ()
"Major mode to control media players"
- :version "1.2.1")
+ :version "1.2.2")
(defcustom media/player-api "media-mplayer"
"The file to load for the abstract layer with the media player."
(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))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;