--- loncom/lond 2005/12/09 20:54:23 1.302 +++ loncom/lond 2005/12/09 21:17:16 1.303 @@ -2,7 +2,7 @@ # The LearningOnline Network # lond "LON Daemon" Server (port "LOND" 5663) # -# $Id: lond,v 1.302 2005/12/09 20:54:23 raeburn Exp $ +# $Id: lond,v 1.303 2005/12/09 21:17:16 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -59,7 +59,7 @@ my $DEBUG = 0; # Non zero to ena my $status=''; my $lastlog=''; -my $VERSION='$Revision: 1.302 $'; #' stupid emacs +my $VERSION='$Revision: 1.303 $'; #' stupid emacs my $remoteVERSION; my $currenthostid="default"; my $currentdomainid; @@ -3594,8 +3594,8 @@ sub dump_dcmail_handler { if ($hashref) { while (my ($key,$value) = each(%$hashref)) { my $match = 1; - $key = &unescape($key); - my ($timestamp,$subj,$uname,$udom) = split(/:/,&unescape($key),5); + my ($timestamp,$subj,$uname,$udom) = + split(/:/,&unescape(&unescape($key)),5); # yes, twice really $timestamp = &unescape($timestamp); $subj = &unescape($subj); $uname = &unescape($uname);