# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1152710192 0
# Node ID e891eb992cb22f6ea17da2b25deb51ca20c24104
# Parent  347f809d2edbe78b1bf766e6d5a4f835c27e8f02
(general_insert_function): Remove loop around wrong_type_argument.

diff -r 347f809d2edb -r e891eb992cb2 src/editfns.c
--- a/src/editfns.c	Wed Jul 12 13:16:13 2006 +0000
+++ b/src/editfns.c	Wed Jul 12 13:16:32 2006 +0000
@@ -2140,7 +2140,6 @@
   for (argnum = 0; argnum < nargs; argnum++)
     {
       val = args[argnum];
-    retry:
       if (INTEGERP (val))
 	{
 	  unsigned char str[MAX_MULTIBYTE_LENGTH];
@@ -2165,10 +2164,7 @@
 				      inherit);
 	}
       else
-	{
-	  val = wrong_type_argument (Qchar_or_string_p, val);
-	  goto retry;
-	}
+	wrong_type_argument (Qchar_or_string_p, val);
     }
 }