ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Mozilla-Plugin/Plugin.pm
(Generate patch)

Comparing Mozilla-Plugin/Plugin.pm (file contents):
Revision 1.6 by root, Sun Feb 25 12:04:43 2001 UTC vs.
Revision 1.7 by root, Sun Feb 25 13:29:41 2001 UTC

138 while ($argc--) { 138 while ($argc--) {
139 my ($argn, $argv) = (rcv_blk, rcv_blk); 139 my ($argn, $argv) = (rcv_blk, rcv_blk);
140 $args{$argn} = $argv; 140 $args{$argn} = $argv;
141 } 141 }
142 142
143 warn "new obj $objid\n";#d#
144 $_OBJ{$objid} = $interface->new( 143 $_OBJ{$objid} = $interface->new(
145 objid => $objid, 144 objid => $objid,
146 type => $type, 145 type => $type,
147 mode => $mode, 146 mode => $mode,
148 save => $save, 147 save => $save,
194 my $class = shift; 193 my $class = shift;
195 my $self = bless { @_ }, $class; 194 my $self = bless { @_ }, $class;
196 $self->{save} = $self->{save} ne "" 195 $self->{save} = $self->{save} ne ""
197 ? Storable::thaw $self->{save} 196 ? Storable::thaw $self->{save}
198 : {}; 197 : {};
199 warn "new: ".Dumper($self);
200 $self; 198 $self;
201} 199}
202 200
203sub set_window { 201sub set_window {
204 my $self = shift; 202 my $self = shift;
217 unless ($self->{window}) { 215 unless ($self->{window}) {
218 $self->{window} = $new; 216 $self->{window} = $new;
219 print "window new calling with $new->{window}, $new->{w}, $new->{h}\n";#d# 217 print "window new calling with $new->{window}, $new->{w}, $new->{h}\n";#d#
220 $self->window_new($new->{window}, $new->{w}, $new->{h}); 218 $self->window_new($new->{window}, $new->{w}, $new->{h});
221 } 219 }
222 warn "set_window: ".Dumper($self);
223} 220}
224 221
225sub window_new {} 222sub window_new {}
226sub window_resize {} 223sub window_resize {}
227 224
235 $self->set_window(undef); 232 $self->set_window(undef);
236 Storable::nfreeze $self->{save}; 233 Storable::nfreeze $self->{save};
237} 234}
238 235
239sub DESTROY { 236sub DESTROY {
240 warn "DESTROY"; 237 #warn "DESTROY";#d#
241} 238}
242 239
2431; 2401;
244 241
245=back 242=back

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines