From: Glenn Morris <rgm@gnu.org>
Date: Wed, 21 May 2008 03:59:23 +0000 (+0000)
Subject: Seiji Zenitani <zenitani at mac.com>
X-Git-Tag: emacs-pretest-23.0.90~5392
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=271a71c732275dc7b7eb58910c72a9a037f5827b;p=emacs.git

Seiji Zenitani <zenitani at mac.com>
Ryo Yoshitake <ryo at shiftmode.net>

(x-create-frame, Qalpha): Initialize the frame parameter `alpha'.
---

diff --git a/src/xfns.c b/src/xfns.c
index e631dfd5548..e1dcee62bba 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -3405,6 +3405,8 @@ This function is an internal primitive--use `make-frame' instead.  */)
   x_default_parameter (f, parms, Qscroll_bar_width, Qnil,
 		       "scrollBarWidth", "ScrollBarWidth",
 		       RES_TYPE_NUMBER);
+  x_default_parameter (f, parms, Qalpha, Qnil,
+		       "alpha", "Alpha", RES_TYPE_NUMBER);
 
   /* Dimensions, especially FRAME_LINES (f), must be done via change_frame_size.
      Change will not be effected unless different from the current
@@ -5771,7 +5773,8 @@ frame_parm_handler x_frame_parm_handlers[] =
   x_set_fringe_width,
   x_set_wait_for_wm,
   x_set_fullscreen,
-  x_set_font_backend
+  x_set_font_backend,
+  x_set_alpha
 };
 
 void