Index: Slim/Player/SqueezeboxG.pm =================================================================== RCS file: /home/cvs/cvsroot/slim/server/Slim/Player/SqueezeboxG.pm,v retrieving revision 1.14 diff -u -p -B -r1.14 SqueezeboxG.pm --- Slim/Player/SqueezeboxG.pm 11 Sep 2004 04:27:30 -0000 1.14 +++ Slim/Player/SqueezeboxG.pm 24 Sep 2004 03:42:49 -0000 @@ -498,6 +498,9 @@ sub scrollBottom { my $client = shift; my $lines = shift; return if Slim::Buttons::Common::param($client,'noScroll'); + + my $rate = Slim::Buttons::Common::paramOrPref($client,$client->linesPerScreen() == 1 ? 'scrollRateDouble': 'scrollRate'); + my $linefunc = $client->lines(); my $parts = $client->parseLines(&$linefunc($client)); @@ -514,8 +517,8 @@ sub scrollBottom { $parts->{line2} .= $interspace . $parts->{line2}; $parts->{endscroll2} = length($line2bits) + length($interspaceBits); - $parts->{scroll2} = 14; - $parts->{deltaTime} = Slim::Buttons::Common::paramOrPref($client,$client->linesPerScreen() == 1 ? 'scrollRateDouble': 'scrollRate'); + $parts->{scroll2} = $rate ? 14 : 0; + $parts->{deltaTime} = $rate ? $rate : 1; # use a negative offset to indicate that we are going to pause at the beginning my $pause = Slim::Buttons::Common::paramOrPref($client,$client->linesPerScreen() == 1 ? 'scrollPauseDouble': 'scrollPause');