Browse files

Rename -get-toc-with-discid.

  • Loading branch information...
1 parent b5654f9 commit c4fde87b9eef5f8462757268acfe2dd1ed861178 Lars Magne Ingebrigtsen committed Apr 16, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 musicbrainz.el
@@ -70,7 +70,7 @@
(nth 2 (assq 'release-event-list release)))))
0 4)))))
-(defun musicbrainz-get-toc-with-discid (&optional cdrom)
+(defun musicbrainz-toc (&optional cdrom)
"Get the Table Of Contents by using the cd-discid extenal command."
(let ((output (shell-command-to-string
(format "cd-discid --musicbrainz %s"
@@ -79,7 +79,7 @@
(error "No output from cd-discid")
(mapcar #'string-to-number (split-string output)))))
-(defun musicbrainz-compute-discid (toc)
+(defun musicbrainz-discid (toc)
(setq toc (copy-list toc))
(insert (format "%02X%02X%08X" 1 (pop toc) (car (last toc))))

0 comments on commit c4fde87

Please sign in to comment.