# HG changeset patch
# User jwe
# Date 948855718 0
# Node ID 32dd5d5e8c8f932c1484afed10dc64e0d946e8f0
# Parent  4b79cb009dd41a11137bbaf5a41f779381238374
[project @ 2000-01-26 03:01:58 by jwe]

diff --git a/src/ChangeLog b/src/ChangeLog
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2000-01-25  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
+	* pt-pr-code.cc (tree_print_code::visit_unwind_protect_command): 
+	Print `unwind_protect_cleanup', not `cleanup_code'.
+
 	* pager.cc (octave_pager_buf::flush_current_contents_to_diary):
 	New function.
 	(octave_pager_stream::flush_current_contents_to_diary):
diff --git a/src/pt-pr-code.cc b/src/pt-pr-code.cc
--- a/src/pt-pr-code.cc
+++ b/src/pt-pr-code.cc
@@ -1055,7 +1055,7 @@
 
   indent ();
 
-  os << "cleanup_code";
+  os << "unwind_protect_cleanup";
 
   newline ();