Fix bug: Range-check integer ‘alpha’ frame parm value

Typo introduced 2013-04-01, "Prefer < to >
in range checks such as 0 <= i && i < N".

* src/frame.c (x_set_alpha): Use ‘ialpha’, not ‘alpha’.

diff --git a/src/frame.c b/src/frame.c
index 74588cea702be91d18ad396b40b8b6773e3f64d0..4089ec94b9ea7e8592933635ae84d30c4120c41e 100644 (file)
--- a/src/frame.c
+++ b/src/frame.c
@@ -4001,7 +4001,7 @@ x_set_alpha (struct frame *f, Lisp_Object arg, Lisp_Object oldval)
       else if (INTEGERP (item))
        {
          EMACS_INT ialpha = XINT (item);
-         if (! (0 <= ialpha && alpha <= 100))
+         if (! (0 <= ialpha && ialpha <= 100))
            args_out_of_range (make_number (0), make_number (100));
          alpha = ialpha / 100.0;
        }