frozen-bubble
Radoslaw Zielinski
radek w karnet.pl
Pią, 17 Gru 2004, 17:49:22 CET
Lukasz Glebicki <lukaszgl w post.pl> [17-12-2004 17:31]:
> On Friday 17 of December 2004 17:16, kosciej wrote:
>> Ostatni upgrejdnalem system i frozen-bubble mi juz wiecej nie startuje
>> - pisze cos o SDLu...Czy komus rowniez ten blad sie pojawia??
> Tak, mi.
[...]
> write(2, "Not a HASH reference at /usr/bin"..., 57Not a HASH reference
[...]
> Tyle pokazał strace odnośnie błędu o którym mówisz.
[...]
To samo pokazał frozen-bubble bez strace. :-p
Wygląda na to, że interfejs perl-SDL się zmienił. Częściowy patch
w załączniku.
--
Radosław Zieliński <radek w karnet.pl>
[ GPG key: http://radek.karnet.pl/ ]
-------------- następna część ---------
--- /usr/bin/frozen-bubble 2004-07-15 00:14:17.000000000 +0200
+++ frozen-bubble 2004-12-17 17:47:27.911812720 +0100
@@ -191,9 +191,10 @@
while ($tryanother->() == 0) {};
} else {
$mus = SDL::Music->new("$FPATH$musics{$name}");
- $mus->{-data} or print STDERR "Warning, could not create new music from `$FPATH$musics{$name}' (reason: ", $app->error, ").\n";
+# $mus->{-data} or print STDERR "Warning, could not create new music from `$FPATH$musics{$name}' (reason: ", $app->error, ").\n";
if ($pos) {
- fb_c_stuff::fade_in_music_position($mus->{-data}, -1, 500, $pos);
+# fb_c_stuff::fade_in_music_position($mus->{-data}, -1, 500, $pos);
+ $mixer->fade_in_music($mus, 500, $pos);
} else {
$mixer->play_music($mus, -1);
}
@@ -212,7 +213,7 @@
foreach (@sounds) {
my $sound_path = "$FPATH/snd/$_.wav";
$sound{$_} = SDL::Sound->new($sound_path);
- if ($sound{$_}{-data}) {
+ if (1 || $sound{$_}{-data}) {
$sound{$_}->volume(80);
} else {
print STDERR "Warning, could not create new sound from `$sound_path'.\n";
@@ -307,7 +308,7 @@
sub add_image($) {
my $file = "$FPATH/gfx/$_[0]";
my $img = SDL::Surface->new(-name => $file);
- $img->{-surface} or die "FATAL: Couldn't load `$file' into a SDL::Surface.\n";
+# $img->{-surface} or die "FATAL: Couldn't load `$file' into a SDL::Surface.\n";
add_default_rect($img);
return $img;
}
-------------- następna część ---------
Załącznik, który nie był tekstem został usunięty...
Name: nie znany
Type: application/pgp-signature
Size: 189 bytes
Desc: nie znany
Url : /mailman/pipermail/pld-users-pl/attachments/20041217/d3b3fef9/attachment-0001.bin
Więcej informacji o liście dyskusyjnej pld-users-pl