
class xuiPropertyPage {
    inherit xuiStructure
    
    # Property page under which to hook 
    
    public variable hookUnder {}
    public variable icon closedFolder
        constructor {} {
    setXuiClass propertyPage
    }   
    method clone
    method copyClone
}

body xuiPropertyPage::clone {{parentName ::#auto}} {
   set clone [xuiPropertyPage $parentName.$name]
   copyClone $clone
   return $clone
}

body xuiPropertyPage::copyClone { clone } {
   xuiStructure::copyClone $clone
   $clone configure -icon [$this cget -icon]
   $clone configure -hookUnder [$this cget -hookUnder]
}

