How do you make a SmartIcon that inserts a bullet into a Rich Text Field?

Use this formula for the SmartIcon:

@Command([TextSetFontFace]; "Symbol");
@Command([TextSetFontSize]; "10");
@Command([TextSetFontColor]; [Red]);
@Command([EditInsertText]; "?");
@Command([TextNormal]);
@Command([TextSetFontFace]; "Helv");
@Command([TextSetFontColor]; [Black]);
@Command([EditInsertText]; "  ")

Applies to Notes Versions: 3