diff --git a/docs/CREDITS b/docs/CREDITS
index 128bdf61cc..74d4289766 100644
--- a/docs/CREDITS
+++ b/docs/CREDITS
@@ -432,6 +432,8 @@ Marcin Łukasik
 Le Jin
 Alex Bennee
 Stéphane Quertinmont
+Bartosz Fabianowski
+
 
 The libmad team
 The wavpack team
diff --git a/wps/wpsbuild.pl b/wps/wpsbuild.pl
index 4a27325e35..bb229dfebf 100755
--- a/wps/wpsbuild.pl
+++ b/wps/wpsbuild.pl
@@ -13,7 +13,6 @@ use Getopt::Long qw(:config pass_through);	# pass_through so not confused by -DT
 
 my $ROOT="..";
 my $verbose;
-my $firmdir="$ROOT/firmware";
 my $rbdir=".rockbox";
 my $wpslist;
 my $target;
@@ -26,6 +25,7 @@ GetOptions ( 'r|root=s'		=> \$ROOT,
 
 ($wpslist, $target) = @ARGV;
 
+my $firmdir="$ROOT/firmware";
 my $cppdef = $target;
 my @depthlist = ( 16, 8, 4, 2, 1 );