(Fplay_sound): Initialize header_size also for :data case.

diff --git a/src/ChangeLog b/src/ChangeLog
index 9489c1f4a372c3eda665f7af7cf35fbe32871963..2f9fc4834b14b2c2e514a4affc00f8f603a98415 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2002-01-14  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
+
+       * sound.c (Fplay_sound): Initialize header_size also for :data
+       case.
+
 2002-01-13  Andreas Schwab  <schwab@suse.de>
 
        * xterm.c (x_load_font): Never set fonts_changed_p to zero.

diff --git a/src/sound.c b/src/sound.c
index 00d5fa2d0736f8fffd866b684ff9cbf801a81006..2682415e3768807877cd2e16f6b991a40352fd58 100644 (file)
--- a/src/sound.c
+++ b/src/sound.c
@@ -446,8 +446,8 @@ a system-dependent default device name is used.")
   else
     {
       s.data = attrs[SOUND_DATA];
-      bcopy (XSTRING (s.data)->data, s.header,
-            min (MAX_SOUND_HEADER_BYTES, STRING_BYTES (XSTRING (s.data))));
+      s.header_size = min (MAX_SOUND_HEADER_BYTES, STRING_BYTES (XSTRING (s.data)));
+      bcopy (XSTRING (s.data)->data, s.header, s.header_size);
     }
 
   /* Find out the type of sound.  Give up if we can't tell.  */