# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1153229289 0
# Node ID 423c880b693f93f261970c6c11fc9998d2f7a2f7
# Parent  dd7e7d68e3b04d383fec10f63ba47d559a94aa8e
(x_set_line_spacing, x_set_screen_gamma): Use signal_error.

diff -r dd7e7d68e3b0 -r 423c880b693f src/frame.c
--- a/src/frame.c	Tue Jul 18 13:28:02 2006 +0000
+++ b/src/frame.c	Tue Jul 18 13:28:09 2006 +0000
@@ -3030,8 +3030,7 @@
   else if (NATNUMP (new_value))
     f->extra_line_spacing = XFASTINT (new_value);
   else
-    Fsignal (Qerror, Fcons (build_string ("Invalid line-spacing"),
-			    Fcons (new_value, Qnil)));
+    signal_error ("Invalid line-spacing", new_value);
   if (FRAME_VISIBLE_P (f))
     redraw_frame (f);
 }
@@ -3051,8 +3050,7 @@
     /* The value 0.4545 is the normal viewing gamma.  */
     f->gamma = 1.0 / (0.4545 * XFLOATINT (new_value));
   else
-    Fsignal (Qerror, Fcons (build_string ("Invalid screen-gamma"),
-			    Fcons (new_value, Qnil)));
+    signal_error ("Invalid screen-gamma", new_value);
 
   clear_face_cache (0);
 }