From 7858cc043933ba59f692637d6ef1d08b4c7b5681 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Mon, 23 Jan 2006 23:19:24 +0000
Subject: [PATCH] fix the command end.

---
 perl/DXXml/Cmd.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl/DXXml/Cmd.pm b/perl/DXXml/Cmd.pm
index 821606af..e985b37d 100644
--- a/perl/DXXml/Cmd.pm
+++ b/perl/DXXml/Cmd.pm
@@ -35,7 +35,7 @@ sub handle_input
 		
 		my $cmd = $self->{content};
 		
-		if ($self->{o} eq $dxchan->call) {	# online user or node
+		if ($self->{u} && $self->{u} eq $dxchan->call) {	# online user or node
 			@in = (DXCommandmode::run_cmd($dxchan, $cmd));
 		} else {
 			# remote command
@@ -57,7 +57,7 @@ sub handle_input
 			Log('rcmd', 'in', $ref->{priv}, $self->{o}, "$self->{content}($answer)");
 		}
 		my $rep = DXXml::Text->new(u=>$self->{u}, to=>$self->{o}, content=>join('%0A', @in));
-		$rep->route($dxchan);
+		$rep->route($main::me); # because it's coming from me!
 	} else {
 		$self->route($dxchan);
 	}
-- 
2.34.1