Added method setGoAwayWhenAnotherWindowBecomesKey:

Author: jerrykrinock

SSYAlert.h

@@ -735,6 +735,15 @@ extern NSObject <SSYAlertErrorHideManager> * gSSYAlertErrorHideManager ;
 */
 - (void)cleanSlate ;
 
+/*!
+ @brief    Sets whether or not the receiver observes for a window other than
+ its own to become key, and when so sends itself a -goAway message
+ 
+ @details  Provides a loosely-coupled self-cleanup mechanism so that the
+ receiver's window does not annoy the user.  Value is NO by default.
+ */
+- (void)setGoAwayWhenAnotherWindowBecomesKey:(BOOL)yn ;
+
 /*!
  @brief    Sets the title of the receiver's window
 
@@ -797,7 +806,7 @@ extern NSObject <SSYAlertErrorHideManager> * gSSYAlertErrorHideManager ;
 
 /*!
  @brief    Sets the title of the (rightmost) "default" button, the
- one whose key equivalent is \r.
+ one whose key equivalent is \\r.
  @param    title  The desired button title, or nil.
 */
 - (void)setButton1Title:(NSString*)title ;

SSYAlert.m

@@ -1827,6 +1827,35 @@ - (void)goAway {
 	[self release] ;  // Balances retain, above
 }
 
+- (void)someWindowDidBecomeKey:(NSNotification*)note {
+    if ([note object] != [self window]) {
+        [self goAway] ;
+    }
+}
+
+- (void)startObservingOtherWindowsToBecomeKey {
+    [[NSNotificationCenter defaultCenter] addObserver:self
+                                             selector:@selector(someWindowDidBecomeKey:)
+                                                 name:NSWindowDidBecomeKeyNotification
+                                               object:nil] ;
+}
+
+- (void)stopObservingOtherWindowsToBecomeKey {
+    [[NSNotificationCenter defaultCenter] removeObserver:self
+                                                    name:NSWindowDidBecomeKeyNotification
+                                                  object:nil] ;
+    
+}
+
+- (void)setGoAwayWhenAnotherWindowBecomesKey:(BOOL)yn {
+    if (yn) {
+        [self startObservingOtherWindowsToBecomeKey] ;
+    }
+    else {
+        [self stopObservingOtherWindowsToBecomeKey] ;
+    }
+}
+
 #pragma mark * Public Methods for Getting Status
 
 - (BOOL)modalSessionRunning {
@@ -1859,7 +1888,7 @@ - (NSCellStateValue)checkboxState {
 // The value WINDOW_PROTOTYPE_HEIGHT = 486 places it at 900, 100 pixels from the 
 // bottom of the menu bar.
 
-- init {
+- (id)init {
 	if (!NSApp || ([SSYProcessTyper currentType] != SSYProcessTyperTypeForeground)) {
 		// See http://lists.apple.com/archives/Objc-language/2008/Sep/msg00133.html ...
 		// Actually, this is unsafe, as pointed out by Quincey Morris…
@@ -1911,6 +1940,7 @@ - (NSCellStateValue)checkboxState {
 		self.windowTopCenter = windowTopCenter_ ;
 	}
 
+    ///*SSYDBL*/ NSLog(@"Created alert %p", self) ;
 	return self ;
 }
 
@@ -2164,6 +2194,8 @@ + (NSInteger)runModalDialogTitle:(NSString*)title
 #pragma mark * Basic Infrastructure
 
 - (void)dealloc {
+    [self stopObservingOtherWindowsToBecomeKey] ;
+    
 	[icon release] ;
 	[progressBar release] ;
 	[titleTextView release] ;
@@ -2181,7 +2213,8 @@ - (void)dealloc {
 	[buttonPrototype release] ;
 	[wordAlert release] ;
 	[documentWindow release] ;
-	
+    ///*SSYDBL*/ NSLog(@"Deallocced alert %p", self) ;
+
 	[otherSubviews release] ;
 
 	[clickTarget release] ;