#include "cscdbutn.h"

@implementation WDCCascadeButton

- initWithName:(char*)aName managedBy:anObject
{
  [self setWidget:XtVaCreateManagedWidget(aName,
					  xmCascadeButtonWidgetClass,
					  [anObject getWidget],
					  NULL)];
  [self setParentObject: anObject];
  return [self setAction];
}


- setAction
{
  return self;
}

- setChildObject: anObject
{
  [super setChildObject:anObject];
  return [self setArg:XmNsubMenuId to:[anObject getWidget]];
}
  

@end


