From: minima <minima>
Date: Thu, 20 Jul 2006 01:10:28 +0000 (+0000)
Subject: don't expose channel data on talks in gtk mode
X-Git-Tag: 1.53~33
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=a5b42f8de3d2882755f72d42d9e9092868a61ec1;p=spider.git

don't expose channel data on talks in gtk mode
more console fixes
---

diff --git a/gtkconsole/gtkconsole b/gtkconsole/gtkconsole
index 554d1984..54dcba6b 100755
--- a/gtkconsole/gtkconsole
+++ b/gtkconsole/gtkconsole
@@ -326,7 +326,7 @@ sub handlemsg
 		if (__PACKAGE__->can($handle)) {
 			__PACKAGE__->$handle($list);
 		} else {
-			push @$list, $cmd;
+			unshift @$list, $cmd;
 			__PACKAGE__->handle_def($list);
 		}
 	}
diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index 52806706..4ec31dee 100644
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -833,7 +833,7 @@ sub talk
 	$line =~ s/\\5E/\^/g;
 	if ($self->{talk}) {
 		if ($self->{gtk}) {
-			$self->local_send('T', dd(['talk',$to,$from,$via,$line,@_]));
+			$self->local_send('T', dd(['talk',$to,$from,$via,$line]));
 		} else {
 			$self->local_send('T', "$to de $from: $line");
 		}