--- loncom/loncron	2003/09/11 19:49:59	1.43
+++ loncom/loncron	2003/10/14 15:36:21	1.44
@@ -51,7 +51,12 @@ ENDERROUT
 
 sub start_daemon {
     my ($fh,$daemon,$pidfile) = @_;
-    system("$perlvar{'lonDaemons'}/$daemon 2>>$perlvar{'lonDaemons'}/logs/${daemon}_errors");
+    my $progname=$daemon;
+    if ($daemon eq 'lonc' && $ARGV[0] eq 'new') {
+	$progname='loncnew'; 
+	print "new ";
+    }
+    system("$perlvar{'lonDaemons'}/$progname 2>>$perlvar{'lonDaemons'}/logs/${daemon}_errors");
     sleep 2;
     if (-e $pidfile) {
 	print $fh "Seems like it started ...<p>";