home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / SourceCode / MiscKit1.7.1 / MiscKit / Source / MiscMergeKit / _MiscMergeFieldCommand.m < prev    next >
Encoding:
Text File  |  1995-07-08  |  1.0 KB  |  41 lines
  1. //
  2. //    _MiscMergeFieldCommand.m -- "field" merge command implementation
  3. //        Written by Don Yacktman Copyright (c) 1995 by Don Yacktman.
  4. //                Version 1.0.  All rights reserved.
  5. //        This notice may not be removed from this source code.
  6. //
  7. //    This object is included in the MiscKit by permission from the author
  8. //    and its use is governed by the MiscKit license, found in the file
  9. //    "LICENSE.rtf" in the MiscKit distribution.  Please refer to that file
  10. //    for a list of all applicable permissions and restrictions.
  11. //    
  12.  
  13.  
  14. #import <misckit/miscmerge.h>
  15. #import "_MiscMergeFieldCommand.h"
  16.  
  17. @implementation _MiscMergeFieldCommand
  18.  
  19. static MiscString *myKey = nil;
  20.  
  21. - parseFromString:(MiscString *)aString
  22. {
  23.     if (!myKey) {
  24.         myKey = [MiscString new];
  25.         [myKey setStringValue:"field"];
  26.     }
  27.     if ([self eatKeyWord:myKey from:aString isOptional:YES])
  28.         [aString trimLeadWhiteSpaces];
  29.     theField = [aString copy]; 
  30.     return self;
  31. }
  32.  
  33.  
  34. - executeForMerge:(MiscMergeEngine *)aMerger
  35. {
  36.     [aMerger appendToOutput:[aMerger getField:theField]];
  37.     return self;
  38. }
  39.  
  40. @end
  41.