← Back to branch summary

~ubuntu-branches/ubuntu/trusty/gnustep-base/trusty

« back to all changes in this revision

Viewing changes to Tools/AGSHtml.m

Tags: upstream-1.20.0
Import upstream version 1.20.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
Tools/AGSHtml.m
20
20
 
21
21
   */
22
22
 
23
 
#include        <Foundation/Foundation.h>
24
 
#include        "AGSHtml.h"
25
 
#include "GNUstepBase/GNUstep.h"
26
 
#include "GNUstepBase/GSCategories.h"
 
23
#import "common.h"
 
24
 
 
25
#import "Foundation/NSAutoreleasePool.h"
 
26
#import "Foundation/NSArray.h"
 
27
#import "Foundation/NSDictionary.h"
 
28
#import "Foundation/NSSet.h"
 
29
#import "Foundation/NSUserDefaults.h"
 
30
#import "AGSHtml.h"
 
31
#import "GNUstepBase/NSString+GNUstepBase.h"
 
32
#import "GNUstepBase/NSMutableString+GNUstepBase.h"
27
33
 
28
34
/*
29
35
 * Define constants for use if we are built with apple Foundation
1215
1221
                  if (url == nil)
1216
1222
                    {
1217
1223
                      [buf appendString: @"<dt>"];
1218
 
                      [buf appendString: [[author attributes]
1219
 
                        objectForKey: @"name"]];
 
1224
                      [buf appendString: [[[author attributes]
 
1225
                        objectForKey: @"name"] stringByEscapingXML]];
1220
1226
                    }
1221
1227
                  else
1222
1228
                    {
1224
1230
                      [buf appendString: [[url attributes]
1225
1231
                        objectForKey: @"url"]];
1226
1232
                      [buf appendString: @"\">"];
1227
 
                      [buf appendString: [[author attributes]
1228
 
                        objectForKey: @"name"]];
 
1233
                      [buf appendString: [[[author attributes]
 
1234
                        objectForKey: @"name"] stringByEscapingXML]];
1229
1235
                      [buf appendString: @"</a>"];
1230
1236
                    }
1231
1237
                  if (email != nil)
1654
1660
              str = [prop objectForKey: @"override"];
1655
1661
              if ([str isEqual: @"subclass"] == YES)
1656
1662
                {
1657
 
                  [buf appendString: @"Subclasses <strong>should</strong> "
 
1663
                  [buf appendString: @"Subclasses <strong>must</strong> "
1658
1664
                    @"override this method.<br />\n"];
1659
1665
                }
1660
1666
              else if ([str isEqual: @"dummy"] == YES)
1664
1670
                }
1665
1671
              else if ([str isEqual: @"never"] == YES)
1666
1672
                {
1667
 
                  [buf appendString: @"Subclasses should <strong>NOT</strong> "
 
1673
                  [buf appendString: @"Subclasses must <strong>NOT</strong> "
1668
1674
                    @"override this method.<br />\n"];
1669
1675
                }
1670
1676
 
2209
2215
            }
2210
2216
          [buf appendString: indent];
2211
2217
          [buf appendString: @"<dt>"];
2212
 
          [buf appendString: [dProp objectForKey: @"key"]];
 
2218
          [buf appendString: [[dProp objectForKey: @"key"] stringByEscapingXML]];
2213
2219
          [buf appendString: @" = </dt>\n"];
2214
2220
          [buf appendString: indent];
2215
2221
          [buf appendString: @"<dd>\n"];
2216
2222
          [self incIndent];
2217
2223
          if (value != nil)
2218
2224
            {
2219
 
              [buf appendString: value];
 
2225
              [buf appendString: [value stringByEscapingXML]];
2220
2226
            }
2221
2227
          else
2222
2228
            {