# HG changeset patch
# User james
# Date 1093553588 0
# Node ID e9aa19426bc943e193e4a2d20be56d002c51cda6
# Parent  beb716b23f5b43fd9c66dc422aa33f04b5f7351b
[xemacs-hg @ 2004-08-26 20:53:06 by james]
Remove unused variable 'orig_fun'.

diff -r beb716b23f5b -r e9aa19426bc9 src/ChangeLog
--- a/src/ChangeLog	Thu Aug 26 20:38:34 2004 +0000
+++ b/src/ChangeLog	Thu Aug 26 20:53:08 2004 +0000
@@ -1,3 +1,7 @@
+2004-08-26  Jerry James  <james@xemacs.org>
+
+	* eval.c (Ffuncall): Remove unused variable orig_fun.
+
 2004-08-26  Jerry James  <james@xemacs.org>
 
 	* event-Xt.c (emacs_Xt_unselect_console): Remove unused variable
diff -r beb716b23f5b -r e9aa19426bc9 src/eval.c
--- a/src/eval.c	Thu Aug 26 20:38:34 2004 +0000
+++ b/src/eval.c	Thu Aug 26 20:53:08 2004 +0000
@@ -3762,7 +3762,6 @@
   struct backtrace backtrace;
   int fun_nargs = nargs - 1;
   Lisp_Object *fun_args = args + 1;
-  Lisp_Object orig_fun;
 
   /* QUIT will check for proper redisplay wrapping */
 
@@ -3810,8 +3809,6 @@
   if (debug_on_next_call)
     do_debug_on_call (Qlambda);
 
-  orig_fun = args[0];
-
  retry:
 
   fun = args[0];