aboutsummaryrefslogtreecommitdiff
path: root/lisp/emms-source-playlist.el
diff options
context:
space:
mode:
authorMichael Olson <mwolson@gnu.org>2008-09-19 21:29:17 -0700
committerMichael Olson <mwolson@gnu.org>2008-09-19 21:29:17 -0700
commit99c433e442aac0a9ef40f45089b8a57136a061c3 (patch)
tree9534b1a76e5019617d5658471e6c0865377876b4 /lisp/emms-source-playlist.el
parentdad93593e3efff45f182ba8292063163c73e3e7f (diff)
emms-source-playlist: Remove unused helper functions.
* lisp/emms-source-playlist.el (emms-source-playlist-first) (emms-source-playlist-next): Remove.
Diffstat (limited to 'lisp/emms-source-playlist.el')
-rw-r--r--lisp/emms-source-playlist.el24
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)