diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2010-11-27 16:31:53 +0100 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2010-11-27 17:17:29 +0100 |
commit | 498743bd46b3ab9b2c23140495a1cfeb25f11b8f (patch) | |
tree | 6008cb1841db5bc1c9a60800a5237dbff0b71c81 /source4/scripting/devel | |
parent | 258dc02a9db9280b43d336eecf4a63df790c1945 (diff) | |
download | samba-498743bd46b3ab9b2c23140495a1cfeb25f11b8f.tar.gz samba-498743bd46b3ab9b2c23140495a1cfeb25f11b8f.tar.bz2 samba-498743bd46b3ab9b2c23140495a1cfeb25f11b8f.zip |
show_test_time: Move to root scripting directory as it's useful for s3
and s4.
Autobuild-User: Jelmer Vernooij <jelmer@samba.org>
Autobuild-Date: Sat Nov 27 17:17:29 CET 2010 on sn-devel-104
Diffstat (limited to 'source4/scripting/devel')
-rwxr-xr-x | source4/scripting/devel/show_test_time | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/source4/scripting/devel/show_test_time b/source4/scripting/devel/show_test_time deleted file mode 100755 index d9a18f034e..0000000000 --- a/source4/scripting/devel/show_test_time +++ /dev/null @@ -1,19 +0,0 @@ -#!/usr/bin/env perl -# -use strict; -my %h; -open(FH, "subunit-ls --times --no-passthrough|") || die "pb with subunit-ls"; -while(<FH>) -{ - chomp(); - my @l = split(/ /); - my $val = @l[scalar(@l)-1]; - $h{join(' ',@l)} = $val; -} - -my @sorted = sort { $h{$b}<=>$h{$a} } keys(%h); -use Data::Dumper; -foreach my $l (@sorted) -{ - print "$l\n"; -} |