X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;h=a3b5e983586ed9a9fdab49eac489323660813646;hb=refs%2Fheads%2Fstaging;hp=38d89bbc7d4b772c5c985ac3f9b73b4a72cf5a3f;hpb=f11237c455a6440b5158206dcb2d03850ed1b7b0;p=spider.git

diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index 38d89bbc..a3b5e983 100644
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -66,30 +66,30 @@ $importfn = "$msgdir/import";       # import directory
 
 
 %valid = (
-		  fromnode => '5,From Node',
-		  tonode => '5,To Node',
-		  to => '0,To',
-		  from => '0,From',
-		  t => '0,Msg Time,cldatetime',
-		  private => '5,Private,yesno',
-		  subject => '0,Subject',
-		  linesreq => '0,Lines per Gob',
-		  rrreq => '5,Read Confirm,yesno',
-		  origin => '0,Origin',
-		  lines => '5,Data',
-		  stream => '9,Stream No',
+		  'read' => '5,Times read',
 		  count => '5,Gob Linecnt',
+		  delete => '5,Awaiting Delete,yesno',
+		  deletetime => '5,Deletion Time,cldatetime',
 		  file => '5,File?,yesno',
+		  from => '0,From',
+		  fromnode => '5,From Node',
 		  gotit => '5,Got it Nodes,parray',
-		  lines => '5,Lines,parray',
-		  'read' => '5,Times read',
-		  size => '0,Size',
-		  msgno => '0,Msgno',
 		  keep => '0,Keep this?,yesno',
 		  lastt => '5,Last processed,cldatetime',
+		  lines => '5,Data',
+		  lines => '5,Lines,parray',
+		  linesreq => '0,Lines per Gob',
+		  msgno => '0,Msgno',
+		  origin => '0,Origin',
+		  private => '5,Private,yesno',
+		  rrreq => '5,Read Confirm,yesno',
+		  size => '0,Size',
+		  stream => '9,Stream No',
+		  subject => '0,Subject',
+		  t => '0,Msg Time,cldatetime',
+		  to => '0,To',
+		  tonode => '5,To Node',
 		  waitt => '5,Wait until,cldatetime',
-		  delete => '5,Awaiting Delete,yesno',
-		  deletetime => '5,Deletion Time,cldatetime',
 		 );
 
 # fix up the default sendmail if available
@@ -216,7 +216,7 @@ sub handle_29
 	
 	my $ref = get_fwq($fromnode, $stream);
 	if ($ref) {
-		$_[4] =~ s/\%5E/^/g;
+		$_[4] =~ s/\%5E/~/g;
 		if (@{$ref->{lines}}) {
 			push @{$ref->{lines}}, $_[4];
 		} else {