From a0d8f3237bcb05df8ddfcca8c3f5378e18e9371d Mon Sep 17 00:00:00 2001
From: thomas <kreitler@molgen.mpg.de>
Date: Tue, 17 Oct 2017 10:30:01 +0200
Subject: [PATCH] mxgrub: fix scandir routine

Use the handle, not the name.
---
 mxgrub/mxgrub | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mxgrub/mxgrub b/mxgrub/mxgrub
index c82b7d4..91bee3c 100755
--- a/mxgrub/mxgrub
+++ b/mxgrub/mxgrub
@@ -131,7 +131,7 @@ sub root_dev {
 sub scandir {
 	my ($dir)=@_;
 	opendir my $d,$dir or die "$dir: $!\n";
-	return grep !/^\.\.?$/,readdir $dir;
+	return grep !/^\.\.?$/,readdir $d;
 }
 
 our @MARIUX;         # ( 'mariux-3.14.51-69','mariux-3.14.51-68',...)