--- loncom/loncron 2003/09/11 19:49:59 1.43 +++ loncom/loncron 2004/01/09 17:43:40 1.45 @@ -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 ...

"; @@ -349,7 +354,7 @@ ENDHEADERS print $fh "

";
     $psproc=0;
 
-    open (PSH,"ps -aux|");
+    open (PSH,"ps -aux --cols 140 |");
     while ($line=) { 
 	print $fh "$line"; 
 	$psproc++;