From: Manuel Penschuck <manuel.penschuck@stud.uni-frankfurt.de>
Date: Sat, 16 Feb 2013 20:49:28 +0000 (+0100)
Subject: quite -> quiet
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=24a1d1b3e279df99ed478451555d791bd0dc90c0;p=daqtools.git

quite -> quiet
---

diff --git a/web/include/CtsCommands.pm b/web/include/CtsCommands.pm
index 5bb6f3b..b7e7ede 100644
--- a/web/include/CtsCommands.pm
+++ b/web/include/CtsCommands.pm
@@ -284,7 +284,7 @@ sub commandMonitor {
    my $filename = shift;
    my $interval = shift;
    my $rateNumber = shift;
-   my $quite = shift;
+   my $quiet = shift;
    
    my $trb = $cts->getTrb;
    my @rateRegs = ();
@@ -366,7 +366,7 @@ EOF
          '-'
       ];
       
-      print chr(27) . "[1;1H" . chr(27) . "[2J" unless $quite;
+      print chr(27) . "[1;1H" . chr(27) . "[2J" unless $quiet;
    
       my $read = {};
       $trb->prefetch(1);
@@ -399,7 +399,7 @@ EOF
          }
       }
 
-      unless ($quite) {
+      unless ($quiet) {
          printTable $tab;
          print "\n";
       }
@@ -449,7 +449,7 @@ EOF
          }
       }
       
-      printTable $tab unless $quite;
+      printTable $tab unless $quiet;
       
       if ($filename) {
       # store json
@@ -501,7 +501,7 @@ plot \\
 EOF
 ;
 
-               print "Plot produced\n";
+               print $quiet ? "." : "Plot produced\n";
             } else {
                print "Plotting delayed as to few points captured yet\n";
             }