From 2d0cc4d1566dd23cca46931ef779c6f2db9f0c81 Mon Sep 17 00:00:00 2001
From: mfranz <mfranz>
Date: Wed, 15 Feb 2006 12:15:37 +0000
Subject: [PATCH] add "Print" button to print code to terminal window

---
 gui/dialogs/nasal-console.xml | 19 ++++++++++++++++++-
 1 file changed, 18 insertions(+), 1 deletion(-)

diff --git a/gui/dialogs/nasal-console.xml b/gui/dialogs/nasal-console.xml
index 90ba9ec0b..4da52a5f0 100644
--- a/gui/dialogs/nasal-console.xml
+++ b/gui/dialogs/nasal-console.xml
@@ -15,7 +15,7 @@
 	<textbox>
 		<halign>fill</halign>
 		<pref-height>120</pref-height>
-		<pref-width>400</pref-width>
+		<pref-width>450</pref-width>
 		<slider>20</slider>
 		<editable>true</editable>
 		<property>/sim/gui/dialogs/nasal-console/code</property>
@@ -51,6 +51,23 @@
 				</binding>
 			</button>
 
+			<button>
+				<legend>Print</legend>
+				<equal>true</equal>
+				<binding>
+					<command>dialog-apply</command>
+				</binding>
+				<binding>
+					<command>nasal</command>
+					<script>
+						line = "--------------------------------------------------";
+						print(line);
+						print(getprop("/sim/gui/dialogs/nasal-console/code"));
+						print(line);
+					</script>
+				</binding>
+			</button>
+
 			<button>
 				<legend>Execute</legend>
 				<default>true</default>