Docstrings for playlist saving functions

darcs-hash:20050916113805-4f952-0326d97c34e0ebdbbc06dd8223705f6abd3bdb32.gz

1 files changed, 3 insertions, 1 deletions

diff --git a/emms.el b/emms.el
index 0f12da2..b9bfcde 100644
--- a/emms.el
+++ b/emms.el
@@ -453,7 +453,7 @@ If no playlist exists, a new one is generated."
 ;;; Saving playlists.
 
 (defun emms-playlist-save (playlist filename)
-  "Save a playlist"
+  "Save a playlist in the native EMMS format."
   (interactive "bPlaylist buffer name: \nFFile to save playlist as: ")
   (let ((tracklist '()))
     (condition-case nil
@@ -475,10 +475,12 @@ If no playlist exists, a new one is generated."
       (kill-buffer (current-buffer)))))
 
 (defun emms-playlist-save-active (filename)
+  "Save the active EMMS playlist in native format."
   (interactive "FFile to save playlist as: ")
   (emms-save-playlist emms-playlist-buffer filename))
 
 (defun emms-playlist-save-as-m3u (playlist filename)
+  "Save a playlist in .m3u format."
   (interactive "bPlaylist buffer name: \nFFile to save playlist as: ")
   (let ((tracklist '()))
     (condition-case nil