[LON-CAPA-cvs] cvs: loncom / lond

[albertel]

albertel		Fri Jul 23 09:36:30 2004 EDT

  Modified files:              
    /loncom	lond 
  Log:
  - better way of doing 1.205
  
  
Index: loncom/lond
diff -u loncom/lond:1.207 loncom/lond:1.208
--- loncom/lond:1.207	Fri Jul 23 07:03:05 2004
+++ loncom/lond	Fri Jul 23 09:36:29 2004
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # lond "LON Daemon" Server (port "LOND" 5663)
 #
-# $Id: lond,v 1.207 2004/07/23 11:03:05 foxr Exp $
+# $Id: lond,v 1.208 2004/07/23 13:36:29 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -56,7 +56,7 @@
 my $status='';
 my $lastlog='';
 
-my $VERSION='$Revision: 1.207 $'; #' stupid emacs
+my $VERSION='$Revision: 1.208 $'; #' stupid emacs
 my $remoteVERSION;
 my $currenthostid;
 my $currentdomainid;
@@ -2487,14 +2487,11 @@
 # ------------------------------------------------------------------------- put
 		} elsif ($userinput =~ /^put/) {
 		    if(isClient) {
-			my ($cmd,$udom,$uname,$namespace,$what,@extras)
-			    =split(/:/,$userinput);
+			my ($cmd,$udom,$uname,$namespace,$what)
+			    =split(/:/,$userinput,5);
 			$namespace=~s/\//\_/g;
 			$namespace=~s/\W//g;
 			if ($namespace ne 'roles') {
-                            if (@extras) {
-                                $what .= ':'.join(':',@extras);
-                            }
 			    chomp($what);
 			    my $proname=propath($udom,$uname);
 			    my $now=time;