ChangeLog, ntp-wait.in:

  * scripts/ntp-wait.in: Fun things with backspaces

bk: 3910c8075SWDf750e_JwBfHHcNZGUw

diff --git a/ChangeLog b/ChangeLog
index 06f5984dc037db5f52ef93c8712763f0569d12f5..5ff4467d33bff534e16535deab26e3757bb43a69 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2000-05-03  Harlan Stenn  <stenn@whimsy.udel.edu>
 
+       * scripts/ntp-wait.in: Fun things with backspaces
+
        * configure.in: 4.0.99i5
 
        * ntptrace/ntptrace.c: Protect sys/ioctl.h; grab config.h

diff --git a/scripts/ntp-wait.in b/scripts/ntp-wait.in
index bda0e4437cb41d4ace2bab830cea6c37dde228d3..a26630bebf58cec63fba065f9fa6565c98aa4209 100644 (file)
--- a/scripts/ntp-wait.in
+++ b/scripts/ntp-wait.in
@@ -15,28 +15,28 @@ $cmd = 'ntpq -c "rv 0 state"';
 
 $| = 1;                                # Autoflush output.
 
-print "Waiting for ntpd to synchronize..." if ($opt_v);
+print "Waiting for ntpd to synchronize...  " if ($opt_v);
 for ($i = 0; $i < $opt_n; ++$i) {
     open(Q, $cmd." 2>&1 |") || die "Can't start ntpq: $!";
     while(<Q>) {
       if (/^state=4/) {
-       print " OK!\n" if ($opt_v);
+       print "\bOK!\n" if ($opt_v);
        exit 0;
       }
 
       if (/request variable was unknown/) {
-       print " Can't tell!\nPerhaps you are running an old version of ntpd.\n" if ($opt_v);
+       print "\bCan't tell!\nPerhaps you are running an old version of ntpd.\n" if ($opt_v);
        exit $opt_f;
       }
 
       if (/Connection refused/) {
-       print " ntpd is not running!\n" if ($opt_v);
+       print "\bntpd is not running!\n" if ($opt_v);
        exit 1;
       }
     }
     close(Q);
-    print substr("*+:.", $i % 4, 1) if ($opt_v);
+    print "\b".substr("*+:.", $i % 4, 1) if ($opt_v);
     sleep($opt_s);
 }
-print " No!\nntpd did not synchronize.\n" if ($opt_v);
+print "\bNo!\nntpd did not synchronize.\n" if ($opt_v);
 exit 1;