                            (let* ((stream (assoc elm emms-stream-list))
                                   (fn (intern (concat "emms-play-" (symbol-name (car (last stream))))))
                                   (url (second stream)))
-                             (funcall fn url))))))
+                             (funcall fn url))))
+               ("Delete" . anything-emms-stream-delete-bookmark)
+               ("Edit" . anything-emms-stream-edit-bookmark)))
     (volatile)))
 ;; (anything 'anything-c-source-emms-streams)
 

;; (anything 'anything-c-source-surfraw)

;;; Emms
(defvar anything-c-source-emms-streams
  '((name . "Emms Streams")
    (init . (lambda ()

;;    List all anything sources for test.
;;  `anything-select-source'
;;    Select source.
;;  `anything-emms-stream-edit-bookmark'
;;    Change the information of current emms-stream bookmark from anything.
;;  `anything-emms-stream-delete-bookmark'
;;    Delete an emms-stream bookmark from anything.
;;  `anything-call-source'
;;    Call anything source.
;;  `anything-call-source-from-anything'
