# HG changeset patch
# User Martin Rudalics <rudalics@gmx.at>
# Date 1192178066 0
# Node ID ab853f85e4dc84d995f6c71a63753100d3871f38
# Parent  674c9fa9cb564c3170a48b7c1401ae1ec24c523d
(Qexplicit_name): New variable.
(x_report_frame_params): Report it in parameter alist.
(syms_of_frame): Intern and staticpro it.

diff -r 674c9fa9cb56 -r ab853f85e4dc src/frame.c
--- a/src/frame.c	Fri Oct 12 06:29:24 2007 +0000
+++ b/src/frame.c	Fri Oct 12 08:34:26 2007 +0000
@@ -100,6 +100,7 @@
 #endif
 Lisp_Object Qparent_id;
 Lisp_Object Qtitle, Qname;
+Lisp_Object Qexplicit_name;
 Lisp_Object Qunsplittable;
 Lisp_Object Qmenu_bar_lines, Qtool_bar_lines;
 Lisp_Object Qleft_fringe, Qright_fringe;
@@ -3006,6 +3007,7 @@
     tem = Qnil;
   else
     XSETFASTINT (tem, FRAME_X_OUTPUT (f)->parent_desc);
+  store_in_alist (alistptr, Qexplicit_name, (f->explicit_name ? Qt : Qnil));
   store_in_alist (alistptr, Qparent_id, tem);
 }
 
@@ -3967,6 +3969,8 @@
   staticpro (&Qframep);
   Qframe_live_p = intern ("frame-live-p");
   staticpro (&Qframe_live_p);
+  Qexplicit_name = intern ("explicit-name");
+  staticpro (&Qexplicit_name);
   Qheight = intern ("height");
   staticpro (&Qheight);
   Qicon = intern ("icon");