The solution was in tutorial/CreatingPalettes:
CreatePalette@ Button[Defer[#[\[SelectionPlaceholder]]], Inherited, BaseStyle -> "Evaluate", Evaluator -> None, Appearance -> "Palette"] & /@ {crossMultiply};
Eric
