Minor dragging update.

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

ChangeLog

@@ -1,3 +1,9 @@
+1999-07-03  Richard Frith-Macdonald <richard@brainstorm.co.uk>
+
+	* Source/NSWindow.m: Implement 
+	([-dragImage:at:offset:event:pasteboard:source:slideBack:]) by calling
+	the mothod of the smae name in the window view.
+
 1999-07-03  Adam Fedor  <fedor@gnu.org>
 
 	* Source/NSApplication.m (-run): Added destroyContext (so we can

Source/NSWindow.m

@@ -1457,14 +1457,26 @@ static Class	responderClass;
 /*
  * Dragging
  */
-- (void) dragImage: (NSImage *)anImage
-	       at: (NSPoint)baseLocation
-	       offset: (NSSize)initialOffset
-	       event: (NSEvent *)event
-	       pasteboard: (NSPasteboard *)pboard
-	       source: sourceObject
-	       slideBack: (BOOL)slideFlag
+- (void) dragImage: (NSImage*)anImage
+	        at: (NSPoint)baseLocation
+	    offset: (NSSize)initialOffset
+	     event: (NSEvent*)event
+        pasteboard: (NSPasteboard*)pboard
+	    source: (id)sourceObject
+	 slideBack: (BOOL)slideFlag
 {
+  /*
+   * Ensure we have a content view and it's associated window view.
+   */
+  if (content_view == nil)
+    [self setContentView: nil];
+  [[content_view superview] dragImage: anImage
+				   at: baseLocation
+			       offset: initialOffset
+			        event: event
+			   pasteboard: pboard
+			       source: sourceObject
+			    slideBack: slideFlag];
 }
 
 - (void) registerForDraggedTypes: (NSArray*)newTypes