Remove not needed functions after open phase.

diff --git a/src/conf/cards/aliases.alisp b/src/conf/cards/aliases.alisp
index cff78f7a26192174957a02595fa43174fd3c7519..1661caa3e8cb6088efbdb0aa5bd9fee3db6ff9f6 100644 (file)
--- a/src/conf/cards/aliases.alisp
+++ b/src/conf/cards/aliases.alisp
@@ -23,3 +23,7 @@
   (setq r (if (null r) cardname r))
   (unsetq r)
 )
+
+(defun snd_card_alias_unset ()
+  (unsetq snd_card_aliases_array snd_card_alias)
+)

diff --git a/src/conf/sndo-mixer.alisp b/src/conf/sndo-mixer.alisp
index adf7c97760913f56cea0d3b44f2710fedcc412ae..e60a3c4d970c656316033f5d3133dca408087ee7 100644 (file)
--- a/src/conf/sndo-mixer.alisp
+++ b/src/conf/sndo-mixer.alisp
@@ -108,6 +108,7 @@
 (defun sndo_mixer_close nil
   (sndo_mixer_close1 (nth 1 hctls) "c")
   (sndo_mixer_close1 (nth 0 hctls) "p")
+  (snd_card_alias_unset)
   (unsetq hctls)
 )
 

diff --git a/src/ordinary_mixer/ordinary_mixer.c b/src/ordinary_mixer/ordinary_mixer.c
index d5d3c266f1661039f6f57c683a55ad196e64d061..4f09d1ca244238fc9e56d65d38bf5a56f404f900 100644 (file)
--- a/src/ordinary_mixer/ordinary_mixer.c
+++ b/src/ordinary_mixer/ordinary_mixer.c
@@ -3,7 +3,7 @@
  * \ingroup Mixer_ordinary
  * \brief Ordinary mixer interface
  * \author Jaroslav Kysela <perex@suse.cz>
- * \date 2003
+ * \date 2003,2004
  *
  * Ordinary mixer interface is a high level abtraction for soundcard's
  * mixing.