my $hdr = $f->HButton(
            -takefocus=>0,
	    -padx=>0,
	    -width=>1,
	    -borderwidth=>2,
            -highlightthickness=>0
        )->pack(qw/-side top -anchor n -fill x/);

	$hdr->GeometryRequest($hdr->reqwidth, 18); # Row 150, New!
	$hdr->update;  # Row 151, New!

	$w->Advertise("heading" => $hdr);