From 9d2ffa3a89006e8af7d3759a83a2c5d3ec24c872 Mon Sep 17 00:00:00 2001
From: freesource <freesource>
Date: Fri, 30 Nov 2001 02:26:43 +0000
Subject: [PATCH] Added Esc close capability for save as.

---
 BootRoot/YardBox.pm | 13 +++++++++++++
 gbootroot           |  9 +++++++++
 2 files changed, 22 insertions(+)

diff --git a/BootRoot/YardBox.pm b/BootRoot/YardBox.pm
index 233d5bc..e56f215 100644
--- a/BootRoot/YardBox.pm
+++ b/BootRoot/YardBox.pm
@@ -809,6 +809,15 @@ sub yard_box {
 	$search_window->destroy if $search_window; } );
     $main::yard_window->signal_connect("delete_event", sub { 
 	$search_window->destroy if $search_window; });
+    $main::yard_window->signal_connect("key_press_event", sub {
+	my $event = pop @_; 
+	if ($event->{'keyval'}) {
+	    if ($event->{'keyval'} == 65307) {
+		$main::yard_window->destroy;
+	    }
+	}
+    },
+			     );
     $main::yard_window->set_usize( 525, 450 );
     $main::yard_window->set_policy( $true, $true, $false );
     $main::yard_window->set_title( "Yard Box - $template" );
@@ -1899,6 +1908,10 @@ File Shortcuts
  Alt-N  New Template  
  Ctrl-S Save File
  Alt-A  Save As File
+
+Yard Box Shortcuts
+
+ Esc  Close Yard Box
 SHORTCUTS
 
 sub path {
diff --git a/gbootroot b/gbootroot
index 604523f..b2df96a 100755
--- a/gbootroot
+++ b/gbootroot
@@ -1805,6 +1805,15 @@ sub save_as {
     $save_as = Gtk::Dialog->new();
     $save_as->signal_connect("destroy", \&destroy_window, \$save_as);
     $save_as->signal_connect("delete_event", \&destroy_window, \$save_as);
+    $save_as->signal_connect("key_press_event", sub {
+	my $event = pop @_; 
+	if ($event->{'keyval'}) {
+	    if ($event->{'keyval'} == 65307) {
+		$save_as->destroy;
+	    }
+	}
+    },
+			     );
     $save_as->set_title("Save As");
     $save_as->border_width(12);
     $save_as->set_position('center');