From 1b5b51b72d33284fe0ba80d32ad512769db5a05f Mon Sep 17 00:00:00 2001
From: root <root>
Date: Sat, 11 Feb 2006 01:58:28 +0000
Subject: [PATCH] *** empty log message ***

---
 src/perl/tabbed | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/perl/tabbed b/src/perl/tabbed
index 40c5d68b..4b136c36 100644
--- a/src/perl/tabbed
+++ b/src/perl/tabbed
@@ -91,9 +91,12 @@ sub copy_properties {
    my $tab = $self->{cur};
 
    my $wm_normal_hints = $self->XInternAtom ("WM_NORMAL_HINTS");
+   my $wm_state        = $self->XInternAtom ("WM_STATE");
 
    my %our_props = map +($_ => undef), $self->XListProperties ($self->parent);
 
+   delete $our_props{$wm_state};
+
    for my $atom ($tab->XListProperties ($tab->parent)) {
       my ($type, $format, $items) = $self->XGetWindowProperty ($tab->parent, $atom);
       
-- 
2.34.1