Bug#407743: patch for this bug

[Sam Hocevar]

Package: pangzero
Version: 0.17-1
Followup-For: Bug #407743

   Attached is a patch for this issue.

-- System Information:
Debian Release: 4.0
  APT prefers unstable
  APT policy: (500, 'unstable'), (50, 'experimental')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.19.1
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)

Versions of packages pangzero depends on:
ii  libsdl-perl                 1.20.3dfsg-1 SDL bindings for the Perl language
ii  perl                        5.8.8-7      Larry Wall's Practical Extraction 

pangzero recommends no packages.

-- no debconf information
-------------- next part --------------
--- /usr/games/pangzero	2006-12-15 11:04:14 +0100
+++ pangzero	2007-02-10 15:59:53 +0100
@@ -2379,7 +2379,7 @@ sub RenderBorder {
         -flags=>::SDL_SWSURFACE(), -width => 128, -height => 16, -depth => 32);
     $srcrect1->x(16); $srcrect1->y(0); $srcrect1->width(128); $srcrect1->height(16);
     $borderSurface->blit( $srcrect1, $zoom, new SDL::Rect );
-    $::RotoZoomer->zoom( $zoom, $ScreenWidth / 128, 1);
+    $::RotoZoomer->zoom( $zoom, $ScreenWidth / 128, 1, 0);
     $dstrect->x(16); $dstrect->y(0);
     $zoom->blit( 0, $targetSurface, $dstrect );
     
@@ -2388,7 +2388,7 @@ sub RenderBorder {
         -flags=>::SDL_SWSURFACE(), -width => 16, -height => 128, -depth => 32);
     $srcrect1->x(0); $srcrect1->y(16); $srcrect1->height(128); $srcrect1->width(16);
     $borderSurface->blit( $srcrect1, $zoom, new SDL::Rect );
-    $::RotoZoomer->zoom( $zoom, 1, $ScreenHeight / 128);
+    $::RotoZoomer->zoom( $zoom, 1, $ScreenHeight / 128, 0);
     $dstrect->x(0); $dstrect->y(16);
     $zoom->blit( 0, $targetSurface, $dstrect );
   }
@@ -2429,7 +2429,7 @@ sub RenderBorder {
         -flags=>::SDL_SWSURFACE(), -width => 128, -height => 16, -depth => 32);
     $srcrect1->x(16); $srcrect1->y(0); $srcrect1->width(128); $srcrect1->height(16);
     $borderSurface->blit( $srcrect1, $zoom, new SDL::Rect );
-    $::RotoZoomer->zoom( $zoom, $ScreenWidth / 128, 1);
+    $::RotoZoomer->zoom( $zoom, $ScreenWidth / 128, 1, 0);
     $dstrect->x(16); $dstrect->y(0);
     $zoom->blit( 0, $targetSurface, $dstrect );
     
@@ -2438,7 +2438,7 @@ sub RenderBorder {
         -flags=>::SDL_SWSURFACE(), -width => 16, -height => 128, -depth => 32);
     $srcrect1->x(0); $srcrect1->y(16); $srcrect1->height(128); $srcrect1->width(16);
     $borderSurface->blit( $srcrect1, $zoom, new SDL::Rect );
-    $::RotoZoomer->zoom( $zoom, 1, $ScreenHeight / 128);
+    $::RotoZoomer->zoom( $zoom, 1, $ScreenHeight / 128, 0);
     $dstrect->x(0); $dstrect->y(16);
     $zoom->blit( 0, $targetSurface, $dstrect );
   }