--- loncom/lond	2001/03/27 12:49:18	1.43
+++ loncom/lond	2001/04/02 14:43:17	1.46
@@ -969,16 +969,17 @@ sub make_new_child {
                        }
 # ------------------------------------------------------------------- querysend
                    } elsif ($userinput =~ /^querysend/) {
-                       my ($cmd,$query,$custom)=split(/:/,$userinput);
+                       my ($cmd,$query,
+			   $custom,$customshow)=split(/:/,$userinput);
 		       $query=~s/\n*$//g;
-		       unless ($custom) {
+		       unless ($custom or $customshow) {
 			   print $client "".
 			       sqlreply("$hostid{$clientip}\&$query")."\n";
 		       }
 		       else {
 			   print $client "".
 			       sqlreply("$hostid{$clientip}\&$query".
-					"\&$custom")."\n";
+					"\&$custom"."\&$customshow")."\n";
 		       }
 # ------------------------------------------------------------------ queryreply
                    } elsif ($userinput =~ /^queryreply/) {
@@ -989,6 +990,9 @@ sub make_new_child {
 			   $reply=~s/\&/\n/g;
 			   print $store $reply;
 			   close $store;
+			   my $store2=IO::File->new(">$execdir/tmp/$id.end");
+			   print $store2 "done\n";
+			   close $store2;
 			   print $client "ok\n";
 		       }
 		       else {