X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite-test.pl;h=34b6f52cec0ef22a012adf327251bcf64c9a7bd7;hb=c644add60faff8701c93221355b1bc2e2d24a1a5;hp=a0b71b9eaab8df18b82e3454dfa9ae614171126c;hpb=a33c3a8a1fc98179619e13fd64bc5d2f3c2ddc4d;p=videosite.git

diff --git a/videosite-test.pl b/videosite-test.pl
index a0b71b9..34b6f52 100755
--- a/videosite-test.pl
+++ b/videosite-test.pl
@@ -49,14 +49,14 @@ sub ploader {
 }
 
 sub connectors {
-    my $c = {-name => 'environment', -schemas => {}};
+    my $c = {name => 'environment', schemas => {}};
 
     if (exists($ENV{'http_proxy'})) {
-        $c->{-schemas}->{'http'} = $ENV{'http_proxy'}
+        $c->{schemas}->{'http'} = $ENV{'http_proxy'}
     }
 
     if (exists($ENV{'https_proxy'})) {
-        $c->{-schemas}->{'https'} = $ENV{'https_proxy'}
+        $c->{schemas}->{'https'} = $ENV{'https_proxy'}
     }
 
     return ( $c );
@@ -97,6 +97,8 @@ foreach (@g, $f) {
     }
 }
 
+select(STDOUT);
+$| = 1;
 printf("Doing self tests:\n");
 foreach(@g) {
     my $r;