[elpa] externals/emms a0c4d715f4 12/42: Use fixed sample rate when decoding Opus granule position

[ELPA Syncer]

branch: externals/emms
commit a0c4d715f4e9d41af7860d44292002961a6f186d
Author: Petteri Hintsanen <petterih@iki.fi>
Commit: Petteri Hintsanen <petterih@iki.fi>

    Use fixed sample rate when decoding Opus granule position
    
    This is according to RFC 7845.
---
 emms-info-ogg.el | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/emms-info-ogg.el b/emms-info-ogg.el
index 6f3ef68484..ddec76b6fc 100644
--- a/emms-info-ogg.el
+++ b/emms-info-ogg.el
@@ -152,8 +152,6 @@ See `emms-info-vorbis--split-comment' for details."
           (emms-info-ogg--read-and-decode-packets filename 2))
          (headers
           (emms-info-ogg--decode-headers packets stream-type))
-         (sample-rate
-          (bindat-get-field headers 'identification-header 'sample-rate))
          (user-comments
           (bindat-get-field headers 'comment-header 'user-comments))
          (last-page
@@ -161,7 +159,15 @@ See `emms-info-vorbis--split-comment' for details."
          (granule-pos
           (alist-get 'granule-position last-page))
          (playing-time
-          (emms-info-ogg--decode-granule-pos granule-pos sample-rate))
+          (emms-info-ogg--decode-granule-pos
+           granule-pos
+           (if (eq stream-type 'vorbis)
+               (bindat-get-field headers
+                                 'identification-header
+                                 'sample-rate)
+             ;; Opus assumes a fixed sample rate of 48 kHz for granule
+             ;; position.
+             48000)))
          (comments
           (emms-info-vorbis-extract-comments user-comments)))
     (nconc comments