1. Walton Hoops
  2. cl-taglib

Source

cl-taglib / README.md

Diff from to

File README.md

 
     :::lisp
     (use-package :taglib)
+
+    ;;; Easy way:
+    (extract-tags "09 My Generation.mp3")
+    ;;; result
+    (:TRACK 9 :YEAR 1994 :GENRE "Rock" :COMMENT "Amazon.com Song ID: 205431823"
+     :ALBUM "Thirty Years Of Maximum R&B" :ARTIST "The Who" :TITLE "My Generation")
+
+    ;;; Longer way:
     (with-tag-file (file "07 - 17.mp3")
       (let ((tag (file-tag file))
             (audio (file-audioproperties file)))
 
 (*tag-<property>* tag) Returns the given property.  All tag operations are setf-able.  Available accessors are (title album artist genre comment track year)
 
+(*extract-tags* pathname) Returns a plist of the tags in the given file.
+
 ### Reading audio information
 
 (*file-audioproperties* file) returns the audio properties for the given file