Mercurial > hg > octave-nkf

diff src/variables.cc @ 1588:27f5ac98fc4a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-10-31 06:04:47 by jwe]
author jwe
date Tue, 31 Oct 1995 06:04:47 +0000
parents 0104de09d365
children 2d0541468991
line wrap: on
line diff
--- a/src/variables.cc
+++ b/src/variables.cc
@@ -711,12 +711,12 @@
 
       if (is_function_file (ffile))
 	{
-	  unwind_protect_int (echo_input);
+	  unwind_protect_int (user_pref.echo_executing_commands);
 	  unwind_protect_int (saving_history);
 	  unwind_protect_int (reading_fcn_file);
 	  unwind_protect_int (input_from_command_line_file);
 
-	  echo_input = 0;
+	  user_pref.echo_executing_commands = ECHO_OFF;
 	  saving_history = 0;
 	  reading_fcn_file = 1;
 	  input_from_command_line_file = 0;
@@ -1668,6 +1668,10 @@
 	  do_fortran_indexing,
     "allow single indices for matrices");
 
+  DEFVAR ("echo_executing_commands", SBV_echo_executing_commands, 0.0, 0, 
+	  echo_executing_commands,
+    "echo commands as they are executed");
+
   DEFCONST ("e", SBV_e, exp (1.0), 0, 0,
     "exp (1)");