From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 23 Mar 1994 22:26:28 +0000 (+0000)
Subject: (check_mark, Fcall_interactively): Use assignment, not initialization.
X-Git-Tag: emacs-19.34~9358
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=86c1cf234ed5b5d1147d0aa1d8a5ac9787814429;p=emacs.git

(check_mark, Fcall_interactively): Use assignment, not initialization.
---

diff --git a/src/callint.c b/src/callint.c
index 340ab5a617a..c5a57b7ac3f 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -142,7 +142,8 @@ char *callint_argfuns[]
 static void
 check_mark ()
 {
-  Lisp_Object tem = Fmarker_buffer (current_buffer->mark);
+  Lisp_Object tem;
+  tem = Fmarker_buffer (current_buffer->mark);
   if (NILP (tem) || (XBUFFER (tem) != current_buffer))
     error ("The mark is not set now");
   if (!NILP (Vtransient_mark_mode) && NILP (Vmark_even_if_inactive)
@@ -321,9 +322,9 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
 	}
       else if (*string == '@')
 	{
-	  Lisp_Object event =
-	    XVECTOR (this_command_keys)->contents[next_event];
+	  Lisp_Object event;
 
+	  event = XVECTOR (this_command_keys)->contents[next_event];
 	  if (EVENT_HAS_PARAMETERS (event)
 	      && XTYPE (event = XCONS (event)->cdr) == Lisp_Cons
 	      && XTYPE (event = XCONS (event)->car) == Lisp_Cons