--- loncom/lond 2004/12/28 15:09:38 1.270 +++ loncom/lond 2004/12/31 01:24:14 1.271 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.270 2004/12/28 15:09:38 matthew Exp $ +# $Id: lond,v 1.271 2004/12/31 01:24:14 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -58,7 +58,7 @@ my $DEBUG = 0; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.270 $'; #' stupid emacs +my $VERSION='$Revision: 1.271 $'; #' stupid emacs my $remoteVERSION; my $currenthostid="default"; my $currentdomainid; @@ -3129,7 +3129,8 @@ sub put_course_id_handler { my $hashref = &tie_domain_hash($udom, "nohist_courseids", &GDBM_WRCREAT()); if ($hashref) { foreach my $pair (@pairs) { - my ($key,$courseinfo) = split(/=/,$pair); + my ($key,$courseinfo) = split(/=/,$pair,2); + $courseinfo =~ s/=/:/g; $hashref->{$key}=$courseinfo.':'.$now; } if (untie(%$hashref)) {