From c388d93b8cc7d9e09630a8ac3920e0c16a605b53 Mon Sep 17 00:00:00 2001
From: freesource <freesource>
Date: Fri, 21 Dec 2001 17:29:13 +0000
Subject: [PATCH] This helps with keypress events in the filesystem box.

---
 BootRoot/YardBox.pm | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/BootRoot/YardBox.pm b/BootRoot/YardBox.pm
index d223cbc..9a385cc 100644
--- a/BootRoot/YardBox.pm
+++ b/BootRoot/YardBox.pm
@@ -392,6 +392,20 @@ sub file_system {
 			   else {
 			       $uml_expect{uml_exclusively} = 1;
 
+			   }
+			   # for Yard.pm
+			   $ars->{uml_exclusively} = 
+			       $uml_expect{uml_exclusively};
+			   ars2($ars);			   
+		       });
+	$uml_exclusively->signal_connect("key_press_event", 
+		       sub {  
+			   if ( $uml_exclusively->get_active() == 1 ) {
+			       $uml_expect{uml_exclusively} = 1;
+			   }
+			   else {
+			       $uml_expect{uml_exclusively} = 0;
+
 			   }
 			   # for Yard.pm
 			   $ars->{uml_exclusively} =