comparison src/xfns.c @ 72774:e00572984112

(Fx_file_dialog): Call check_x.
author YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
date Sun, 10 Sep 2006 05:52:09 +0000
parents 892ea79efee6
children 049cdc4ea1a1
comparison
equal deleted inserted replaced
72773:15d914de92fd 72774:e00572984112
5326 extern XtAppContext Xt_app_con; 5326 extern XtAppContext Xt_app_con;
5327 XmString dir_xmstring, pattern_xmstring; 5327 XmString dir_xmstring, pattern_xmstring;
5328 int count = SPECPDL_INDEX (); 5328 int count = SPECPDL_INDEX ();
5329 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5, gcpro6; 5329 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5, gcpro6;
5330 5330
5331 check_x ();
5332
5331 GCPRO6 (prompt, dir, default_filename, mustmatch, only_dir_p, file); 5333 GCPRO6 (prompt, dir, default_filename, mustmatch, only_dir_p, file);
5332 5334
5333 if (popup_activated ()) 5335 if (popup_activated ())
5334 error ("Trying to use a menu from within a menu-entry"); 5336 error ("Trying to use a menu from within a menu-entry");
5335 5337
5492 Lisp_Object file = Qnil; 5494 Lisp_Object file = Qnil;
5493 Lisp_Object decoded_file; 5495 Lisp_Object decoded_file;
5494 int count = SPECPDL_INDEX (); 5496 int count = SPECPDL_INDEX ();
5495 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5, gcpro6; 5497 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4, gcpro5, gcpro6;
5496 char *cdef_file; 5498 char *cdef_file;
5499
5500 check_x ();
5497 5501
5498 GCPRO6 (prompt, dir, default_filename, mustmatch, only_dir_p, file); 5502 GCPRO6 (prompt, dir, default_filename, mustmatch, only_dir_p, file);
5499 5503
5500 if (popup_activated ()) 5504 if (popup_activated ())
5501 error ("Trying to use a menu from within a menu-entry"); 5505 error ("Trying to use a menu from within a menu-entry");