ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/kgsueme/kgsueme/game.pl
(Generate patch)

Comparing kgsueme/kgsueme/game.pl (file contents):
Revision 1.83 by pcg, Thu May 20 22:59:55 2004 UTC vs.
Revision 1.84 by pcg, Thu May 20 23:09:53 2004 UTC

… …
15 Gtk2::Label; 15 Gtk2::Label;
16 16
17sub INIT_INSTANCE { 17sub INIT_INSTANCE {
18 my $self = shift; 18 my $self = shift;
19 19
20 $self->signal_connect (destroy => sub { 20 $self->signal_connect (destroy => sub { $_[0]->stop });
21 $_[0]->stop;
22 });
23 21
24 $self->{set} = sub { }; 22 $self->{set} = sub { };
25 $self->{format} = sub { "ERROR" }; 23 $self->{format} = sub { "ERROR" };
26} 24}
27 25

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines