Mercurial > hg > octave-lyh

diff src/input.cc @ 3176:fccab8e7d35f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1998-05-18 20:33:31 by jwe]
author jwe
date Mon, 18 May 1998 20:33:42 +0000
parents e4bbfc196e53
children c17387059fd3
line wrap: on
line diff
--- a/src/input.cc
+++ b/src/input.cc
@@ -222,12 +222,18 @@
       if (! input_from_startup_file)
 	command_history::add (current_input_line);
 
-      octave_diary << current_input_line;
+      if (! (reading_fcn_file || reading_script_file))
+	{
+	  octave_diary << current_input_line;
+
+	  if (current_input_line[current_input_line.length () - 1] != '\n')
+	    octave_diary << "\n";
+	}
 
       do_input_echo (current_input_line);
     }
-
-  octave_diary << "\n";
+  else if (! (reading_fcn_file || reading_script_file))
+    octave_diary << "\n";
   
   return retval;
 }