From 4f4027902befdd912286973baa5a108e528ab0fe Mon Sep 17 00:00:00 2001 From: Donald Buczek Date: Wed, 7 Feb 2018 12:13:18 +0100 Subject: [PATCH] scripts/check-installed: Fix some minor comment/whitespace issues As requested in #559. --- scripts/check-installed | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/scripts/check-installed b/scripts/check-installed index d588ef84c..122e94cf7 100755 --- a/scripts/check-installed +++ b/scripts/check-installed @@ -5,16 +5,16 @@ # out master branch of git@github.molgen.mpg.de:mariux64/bee-files.git # # git checkout master -# git pull +# git pull --rebase # scripts/check-installed use strict; use warnings; sub scandir { - my ($dirname)=@_; - opendir my $dir,$dirname or die "$dirname: $!\n"; - return sort grep !/^\./,readdir $dir; + my ($dirname)=@_; + opendir my $dir,$dirname or die "$dirname: $!\n"; + return sort grep !/^\./,readdir $dir; } sub save_qx { @@ -45,7 +45,7 @@ for my $beefile (scandir('.')) { $pkg.='.noarch'; } else { $pkg.='.x86_64'; - } + } } if (exists($GIT_FILE{$pkg})) { print "# bee file $beefile overwrites package $pkg from $GIT_FILE{$pkg}\n"; @@ -72,4 +72,3 @@ for my $pkg (sort(keys(%GIT_FILE))) { my $beefile=$GIT_FILE{$pkg}; print "# package in git but not in system: $pkg ($beefile)\n"; } -