--- a/bin/frozen-bubble
+++ b/bin/frozen-bubble
@@ -2680,8 +2680,9 @@
     my $joys = SDL::Joystick::num_joysticks();
     $joysticksinfo and print "\nfound $joys joystick(s)\n";
     for (my $i = 0; $i < $joys; $i++) {
-        push @joysticks, SDL::Joystick->new($i);
-        $joysticksinfo and print "\t" . ($i + 1) . ': ' . (SDL::Joystick::name(SDL::Joystick::index($joysticks[$i])) || 'unknown joystick') . "\n";
+        my $jname = SDL::Joystick::name(SDL::Joystick::index($joysticks[$i])) || 'unknown joystick' ;
+        push @joysticks, SDL::Joystick->new($i) unless $jname =~ /accelerometer/i;
+        $joysticksinfo and print "\t" . ($i + 1) . ": $jname\n";
     }
     $frame = 0;
 
