From: minima <minima>
Date: Fri, 17 Aug 2001 00:38:20 +0000 (+0000)
Subject: fix rcmd routing
X-Git-Tag: R_1_48~99
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=618c97014cb5398a847da35ad2d41c7ee0b0a2ae;p=spider.git

fix rcmd routing
---

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 6202bb7a..0f8aaebf 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1582,9 +1582,9 @@ sub process_rcmd
 	} else {
 		my $ref = DXUser->get_current($tonode);
 		if ($ref && $ref->is_clx) {
-			$self->route($tonode, pc84($tonode, $fromnode, $user, $cmd));
+			$self->route($tonode, pc84($fromnode, $tonode, $user, $cmd));
 		} else {
-			$self->route($tonode, pc34($tonode, $fromnode, $cmd));
+			$self->route($tonode, pc34($fromnode, $tonode, $cmd));
 		}
 	}
 }