Attachment 678879 Details for Bug 825678 – Proposed fix

[patch] Proposed fix

SDL_Perl-v2.2.6-Fix-frame-buffer-support.patch (text/plain), 1.20 KB, created by Petr Pisar on 2013-01-15 16:52:03 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Petr Pisar

Created: 2013-01-15 16:52:03 UTC

Size: 1.20 KB

patch

obsolete

>From 545acbbaaec4de16188754f65f263993dd251702 Mon Sep 17 00:00:00 2001
>From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
>Date: Tue, 15 Jan 2013 17:23:14 +0100
>Subject: [PATCH] Fix frame buffer support
>
><https://bugzilla.redhat.com/show_bug.cgi?id=825678>
>---
> lib/SDL/App.pm | 5 +++--
> 1 file changed, 3 insertions(+), 2 deletions(-)
>
>diff --git a/lib/SDL/App.pm b/lib/SDL/App.pm
>index e5a6cdc..27e3a4f 100644
>--- a/lib/SDL/App.pm
>+++ b/lib/SDL/App.pm
>@@ -71,7 +71,7 @@ sub new {
> 	my $ic = $options{-icon} 	|| $options{-i}		|| "";
> 	my $w = $options{-width} 	|| $options{-w}		|| 800;
> 	my $h = $options{-height} 	|| $options{-h}		|| 600;
>-	my $d = $options{-depth} 	|| $options{-d}		|| 16;
>+	my $d = $options{-depth} 	|| $options{-d}		|| 0;
> 	my $f = $options{-flags} 	|| $options{-f}		|| SDL::SDL_ANYFORMAT();
> 	my $r = $options{-red_size}	|| $options{-r}		|| 5;
> 	my $g = $options{-green_size}	|| $options{-g}		|| 5;
>@@ -112,8 +112,9 @@ sub new {
> 		$SDL::App::USING_OPENGL = 0;
> 	}
> 
>-	my $self = \SDL::SetVideoMode($w,$h,$d,$f)
>+	my $surface = SDL::SetVideoMode($w,$h,$d,$f)
> 		or croak SDL::GetError();
>+	my $self = \$surface;
> 	
> 	if ($ic and -e $ic) {
> 	   my $icon = new SDL::Surface -name => $ic;
>-- 
>1.7.11.7
>

Actions: View | Diff

Attachments on bug 825678: 678295 | 678299 | 678300 | 678316 | 678331 | 678879