Skip to content

Commit

Permalink
Rename -get-toc-with-discid.
Browse files Browse the repository at this point in the history
  • Loading branch information
Lars Magne Ingebrigtsen committed Apr 16, 2011
1 parent b5654f9 commit c4fde87
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions musicbrainz.el
Expand Up @@ -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"
Expand All @@ -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))
(with-temp-buffer
(insert (format "%02X%02X%08X" 1 (pop toc) (car (last toc))))
Expand Down

0 comments on commit c4fde87

Please sign in to comment.