Initial changes for sheet implementation. More to come.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gui/trunk@28283 72102866-910b-0410-8b05-ffd578937521

ChangeLog

@@ -1,3 +1,10 @@
+2009-05-14 14:15-EDT Gregory John Casamento <greg_casamento@yahoo.com>
+
+	* Headers/AppKit/NSWindow.h: Added ivar to contain attachedSheet.
+	* Source/NSAlert.m: New class GSSheetPanel.  Initial changes for 
+	sheet implementation. 
+	* Source/NSWindow.m: Added code to return value of new ivar.
+
 2009-05-10  Adam Fedor  <fedor@gnu.org>
 
 	* Version 0.17.0

Headers/AppKit/NSWindow.h

@@ -203,6 +203,7 @@ APPKIT_EXPORT NSSize NSTokenSize;
   NSWindow       *_parent;
   NSCachedImageRep *_cachedImage;
   NSPoint        _cachedImageOrigin;
+  NSWindow       *_attachedSheet;
 
   struct GSWindowFlagsType {
     unsigned	accepts_drag:1;

Source/NSAlert.m

@@ -892,6 +892,28 @@ setControl(NSView* content, id control, NSString *title)
 
 @end /* GSAlertPanel GMArchiverMethods */
 
+/*
+  GSAlertSheet.  This class provides a borderless window which is
+  attached to the parent window.
+ */
+@interface GSAlertSheet : GSAlertPanel
+@end
+
+@implementation GSAlertSheet
+- (id) initWithContentRect: (NSRect)contentRect
+                 styleMask: (unsigned int)aStyle
+                   backing: (NSBackingStoreType)bufferingType
+                     defer: (BOOL)flag
+                    screen: (NSScreen*)aScreen
+{
+  return [super initWithContentRect: contentRect
+		styleMask: NSBorderlessWindowMask
+		backing: bufferingType
+		defer: flag
+		screen: aScreen];
+}
+@end
+
 /*
   These functions may be called "recursively". For example, from a
   timed event. Therefore, there  may be several alert panel active

Source/NSWindow.m

@@ -986,6 +986,7 @@ many times.
   [super init];
   [self _initDefaults];
 
+  _attachedSheet = nil;
   _backingType = bufferingType;
   _styleMask = aStyle;
   if (aScreen == nil)
@@ -5101,7 +5102,7 @@ current key view.<br />
 
 - (NSWindow *) attachedSheet
 {
-  return nil;
+  return _attachedSheet;
 }
 
 @end