- else
- syntax_error ("Unrecognized print-dialog keyword", key);
- }
- }
-
- if ((UNBOUNDP (device) && UNBOUNDP (settings)) ||
- (!UNBOUNDP (device) && !UNBOUNDP (settings)))
- syntax_error ("Exactly one of :device and :printer-settings must be given",
- keys);
-
- return print_dialog_worker (!UNBOUNDP (device) ? device : settings, 0);
-}
-
-Lisp_Object
-mswindows_handle_print_dialog_box (struct frame *f, Lisp_Object keys)
-{
- Lisp_Object device = Qunbound, settings = Qunbound;
-
- {
- EXTERNAL_PROPERTY_LIST_LOOP_3 (key, value, keys)
- {
- if (EQ (key, Q_device))