/ClientMenu  [		% alter class menu
    (Erase Board)	{MENU_TAG tagprint ERASE_CMD typedprint}
    (Fill Board)	{MENU_TAG tagprint FILL_CMD typedprint}
] /new DefaultMenu send def