Minor documentation additions

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

Source/GSServicesManager.m

@@ -88,6 +88,11 @@ static GSListener	*listener = nil;
 static id		servicesProvider = nil;
 static NSString		*providerName = nil;
 
+/**
+ * Unregisters the service provider registered on the named port.<br />
+ * Applications should use [NSApplication-setServicesProvider:] with a nil
+ * argument instead.
+ */
 void
 NSUnregisterServicesProvider(NSString *name)
 {
@@ -108,6 +113,12 @@ NSUnregisterServicesProvider(NSString *name)
   ASSIGN(providerName, nil);
 }
 
+/**
+ * Registers a services providing object using the specified port name.<br />
+ * Applications should not need to use this, as they can use the
+ * [NSApplication-setServicesProvider:] method instead.  The NSApplication
+ * method will use the name of the application rather than an other port name.
+ */
 void
 NSRegisterServicesProvider(id provider, NSString *name)
 {

Source/NSApplication.m

@@ -2317,6 +2317,10 @@ image.
   return [_listener servicesMenu];
 }
 
+/**
+ * Returns the services provided previously registered using the
+ * -setServicesProvider: method.
+ */
 - (id) servicesProvider
 {
   return [_listener servicesProvider];
@@ -2327,6 +2331,11 @@ image.
   [_listener setServicesMenu: aMenu];
 }
 
+/**
+ * Sets the object which provides services to other applications.<br />
+ * Passing a nil value for anObject will result in the provision of
+ * services to other applications by this application being disabled.
+ */
 - (void) setServicesProvider: (id)anObject
 {
   [_listener setServicesProvider: anObject];
@@ -2335,10 +2344,11 @@ image.
 - (id) validRequestorForSendType: (NSString *)sendType
 		      returnType: (NSString *)returnType
 {
-  if (_delegate != nil && ![_delegate isKindOfClass: [NSResponder class]] &&
-      [_delegate respondsToSelector: @selector(validRequestorForSendType:returnType:)])
+  if (_delegate != nil && ![_delegate isKindOfClass: [NSResponder class]]
+    && [_delegate respondsToSelector:
+    @selector(validRequestorForSendType:returnType:)])
     return [_delegate validRequestorForSendType: sendType
-		      returnType: returnType];
+				     returnType: returnType];
 
   return nil;
 }