- incolour.red = r * 0x0101;
- incolour.green = g * 0x0101;
- incolour.blue = b * 0x0101;
- mcs->gotcolour = GetColor(where, "\pModify Colour:", &incolour,
- &mcs->thecolour);
- ctrlevent(mcs, mc, EVENT_CALLBACK);
+ if (HAVE_COLOR_QD()) {
+ incolour.red = r * 0x0101;
+ incolour.green = g * 0x0101;
+ incolour.blue = b * 0x0101;
+ mcs->gotcolour = GetColor(where, "\pModify Colour:", &incolour,
+ &mcs->thecolour);
+ ctrlevent(mcs, mc, EVENT_CALLBACK);
+ } else
+ dlg_beep(dlg);