diff options
Diffstat (limited to 'move/tree/wait4x')
-rwxr-xr-x | move/tree/wait4x | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/move/tree/wait4x b/move/tree/wait4x deleted file mode 100755 index 40655e94c..000000000 --- a/move/tree/wait4x +++ /dev/null @@ -1,21 +0,0 @@ -#!/usr/bin/perl - -use MDK::Common; -use lib qw(/usr/lib/libDrakX); -use c; - -my $nb = 0; -$| = 1; -print "waiting for X"; -foreach (1..30) { - print "."; - sleep 1; - print("no X server :(\n"), exit 1 if !fuzzy_pidofs(qr/\bX_move\b/); - $nb++ if c::Xtest(':0'); - if ($nb > 2) { #- one succeeded test is not enough :-( - print "found\n"; - exit 0; - } -} -print "not found\n"; -exit 1; |