From 9c0e19a3be2288db79e2502e5fa450c3e20a668d Mon Sep 17 00:00:00 2001
From: Guenter  Geiger <ggeiger@users.sourceforge.net>
Date: Fri, 9 May 2003 16:04:00 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r610, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/; revision=611
---
 pd/src/g_hdial.c | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

(limited to 'pd/src/g_hdial.c')

diff --git a/pd/src/g_hdial.c b/pd/src/g_hdial.c
index 9f0db2cc..1d1b4c6d 100644
--- a/pd/src/g_hdial.c
+++ b/pd/src/g_hdial.c
@@ -12,13 +12,13 @@ put out a "float" as in sliders, toggles, etc. */
 #include <string.h>
 #include <stdio.h>
 #include <ctype.h>
-#include "m_imp.h"
+#include "m_pd.h"
 #include "g_canvas.h"
 #include "t_tk.h"
 #include "g_all_guis.h"
 #include <math.h>
 
-#ifdef NT
+#ifdef MSW
 #include <io.h>
 #else
 #include <unistd.h>
@@ -357,7 +357,12 @@ static void hradio_bang(t_hradio *x)
 	if(x->x_gui.x_fsf.x_snd_able && x->x_gui.x_snd->s_thing)
 	    pd_list(x->x_gui.x_snd->s_thing, &s_list, 2, x->x_at);
     }
-    else outlet_float(x->x_gui.x_obj.ob_outlet, x->x_on);
+    else
+    {
+    	outlet_float(x->x_gui.x_obj.ob_outlet, x->x_on);
+	if(x->x_gui.x_fsf.x_snd_able && x->x_gui.x_snd->s_thing)
+	    pd_float(x->x_gui.x_snd->s_thing, x->x_on);
+    }
 }
 
 static void hradio_fout(t_hradio *x, t_floatarg f)
@@ -393,6 +398,8 @@ static void hradio_fout(t_hradio *x, t_floatarg f)
     else
     {
     	outlet_float(x->x_gui.x_obj.ob_outlet, x->x_on = i);
+	if(x->x_gui.x_fsf.x_snd_able && x->x_gui.x_snd->s_thing)
+	    pd_float(x->x_gui.x_snd->s_thing, x->x_on);
 	(*x->x_gui.x_draw)(x, x->x_gui.x_glist, IEM_GUI_DRAW_MODE_UPDATE);
 	x->x_on_old = x->x_on;
     }
-- 
cgit v1.2.1