diff options
author | Michael Olson <mwolson@gnu.org> | 2008-09-19 21:29:17 -0700 |
---|---|---|
committer | Michael Olson <mwolson@gnu.org> | 2008-09-19 21:29:17 -0700 |
commit | 99c433e442aac0a9ef40f45089b8a57136a061c3 (patch) | |
tree | 9534b1a76e5019617d5658471e6c0865377876b4 | |
parent | dad93593e3efff45f182ba8292063163c73e3e7f (diff) |
emms-source-playlist: Remove unused helper functions.
* lisp/emms-source-playlist.el (emms-source-playlist-first)
(emms-source-playlist-next): Remove.
-rw-r--r-- | lisp/emms-source-playlist.el | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/lisp/emms-source-playlist.el b/lisp/emms-source-playlist.el index 20c13ab..3db4ba2 100644 --- a/lisp/emms-source-playlist.el +++ b/lisp/emms-source-playlist.el @@ -413,30 +413,6 @@ OUT should be the buffer where tracks are stored in pls format." ;; Not implemented yet -;;; Helper functions - -(defun emms-source-playlist-first (buf) - "Return the first track in BUF. -This moves point." - (with-current-buffer buf - (condition-case nil - (progn - (emms-playlist-first) - (emms-playlist-track-at (point))) - (error - nil)))) - -(defun emms-source-playlist-next (buf) - "Return the next track in BUF. -This moves point." - (with-current-buffer buf - (condition-case nil - (progn - (emms-playlist-next) - (emms-playlist-track-at (point))) - (error - nil)))) - ;;; Adding playlists as files ;;;###autoload (autoload 'emms-play-playlist-file "emms-source-playlist" nil t) |