Roxen.git/ server/ etc/ modules/ Roxen.pmod

2000-08-12

2000-08-12 21:49:41 by Martin Stjernholm <mast@lysator.liu.se>

• 9bf1186cae9c1259600f1a8f8f64df954da9da37 (23 lines) (+15/-8) ^{[ Show | Annotate ]}
  Branch: 5.2

Made the charref entity mapping without the '&' and ';' generally
available as parser_charref_table.

Rev: server/etc/modules/Roxen.pmod:1.26

1:   /* -  * $Id: Roxen.pmod,v 1.25 2000/08/12 06:15:36 per Exp $ +  * $Id: Roxen.pmod,v 1.26 2000/08/12 21:49:41 mast Exp $    *    * Various helper functions.    *
842:   RXML.Scope scope_roxen=ScopeRoxen();   RXML.Scope scope_page=ScopePage();    + //! A mapping suitable for Parser.HTML.add_entities to initialize it + //! to transform the standard character reference entities. + mapping(string:string) parser_charref_table = +  lambda () { +  mapping(string:string) table = ([]); +  for (int i = 0; i < sizeof (replace_entities); i++) { +  string chref = replace_entities[i]; +  table[chref[1..sizeof (chref) - 2]] = replace_values[i]; +  } +  return table; +  }(); +    RXML.TagSet entities_tag_set = class   // This tag set always has the lowest priority.   {
861:    void create (string name)    {    ::create (name); -  +     // Note: No string entities are replaced when the result type for    // the parser is t_xml or t_html. -  mapping(string:string) entities = ([]); -  for (int i = 0; i < sizeof (replace_entities); i++) { -  string chref = replace_entities[i]; -  entities[chref[1..sizeof (chref) - 2]] = replace_values[i]; +  add_string_entities (parser_charref_table);    } -  add_string_entities (entities); -  } +    } ("entities_tag_set");      constant monthnum=(["Jan":0, "Feb":1, "Mar":2, "Apr":3, "May":4, "Jun":5,