| … | … | ||
|---|---|---|---|
| 646 | my ($self) = @_; | 646 | my ($self) = @_; |
| 647 | 647 | ||
| 648 | warn "no draw defined for $self\n"; | 648 | warn "no draw defined for $self\n"; |
| 649 | } | 649 | } |
| 650 | 650 | ||
| 651 | my $cntx;#d# | ||
| 652 | sub DESTROY { | 651 | sub DESTROY { |
| 653 | my ($self) = @_; | 652 | my ($self) = @_; |
| 654 | 653 | ||
| 655 | return if CFPlus::in_destruct; | 654 | return if CFPlus::in_destruct; |
| 656 | 655 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |