… | … | ||
---|---|---|---|
70 | 70 | ||
71 | $self->{cur} = $tab; | 71 | $self->{cur} = $tab; |
72 | 72 | ||
73 | $self->configure; | 73 | $self->configure; |
74 | 74 | ||
75 | for my $atom ($tab->XListProperties) { | 75 | for my $atom ($tab->XListProperties ($tab->parent)) { |
76 | warn "$atom\n"; | 76 | warn "$atom\n"; |
77 | } | 77 | } |
78 | 78 | ||
79 | $tab->XMapWindow ($tab->parent); | 79 | $tab->XMapWindow ($tab->parent); |
80 | 80 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |