aplaws-commit

[<ap...@vh...>]

Author: apevec
Date: 2006-04-26 23:17:49 +0200 (Wed, 26 Apr 2006)
New Revision: 1120

Modified:
   trunk/tools/tools/lib/CCM/Server/Tomcat.pm
Log:
always append logfiles, to avoid getting sparse files


Modified: trunk/tools/tools/lib/CCM/Server/Tomcat.pm
===================================================================
--- trunk/tools/tools/lib/CCM/Server/Tomcat.pm	2006-04-25 13:47:33 UTC (rev 1119)
+++ trunk/tools/tools/lib/CCM/Server/Tomcat.pm	2006-04-26 21:17:49 UTC (rev 1120)
@@ -101,8 +101,8 @@
     if (@_) {
         $command .= " " . join(" ", @_);
     }
-    $command .= " > " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stdout.log');
-    $command .= " 2> " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stderr.log');
+    $command .= " >> " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stdout.log');
+    $command .= " 2>> " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stderr.log');
     $command .= " &";
     CCM::Util::setuser();
     $self->runExec($command);
@@ -117,8 +117,8 @@
     if (@_) {
         $command .= " " . join(" ", @_);
     }
-    $command .= " > " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stdout.log');
-    $command .= " 2> " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stderr.log');
+    $command .= " >> " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stdout.log');
+    $command .= " 2>> " . File::Spec->catfile($self->getCCMHome(), 'logs', 'catalina-stderr.log');
     CCM::Util::setuser();
     $self->runExec($command);
 }