# HG changeset patch
# User Ken Raeburn <raeburn@raeburn.org>
# Date 949884316 0
# Node ID 8344762c0da20296dfb444e8ed3b56c85029e586
# Parent  6c9ee29e89556f3aced2ff42edcf6ed370cf7be2
* sound.c (sound_cleanup): Don't call device close routine if pointer is null.

diff -r 6c9ee29e8955 -r 8344762c0da2 src/ChangeLog
Binary file src/ChangeLog has changed
diff -r 6c9ee29e8955 -r 8344762c0da2 src/sound.c
--- a/src/sound.c	Sun Feb 06 23:37:51 2000 +0000
+++ b/src/sound.c	Mon Feb 07 00:45:16 2000 +0000
@@ -347,7 +347,8 @@
 {
   if (current_sound_device)
     {
-      current_sound_device->close (current_sound_device);
+      if (current_sound_device->close)
+	current_sound_device->close (current_sound_device);
       if (current_sound->fd > 0)
 	emacs_close (current_sound->fd);
     }