misc/plugins/phrase.wp2

#?SuikaWikiConfig/2.0

Plugin:
  @Name: Phrase
  @Description:
    @@@: Phrasal element
    @@lang:en
  @License: %%GPL%%
  @Author:
    @@Name:
      @@@@: Wakaba
      @@@lang:ja
      @@@script:Latn
    @@Mail[list]: w@suika.fam.cx
  @Date.RCS:
    $Date: 2004/01/16 07:54:22 $

PluginConst:
  @NS_XHTML1:
    http://www.w3.org/1999/xhtml


FormattingRule:
  @Category[list]:
    view
    view-resource
    form-input
    page-link
    link-to-resource
  @Name: abbr
  @Description:
    @@@: Abbreviation
    @@lang: en
  @Formatting:
    my $abbr = $p->{-parent}->append_new_node
                                (type => '#element',
                                 namespace_uri => $NS_XHTML1,
                                 local_name => 'abbr');
    __ATTRNODE:%short->{$abbr}__;
    __ATTRTEXT:%long__;
    $abbr->set_attribute (title => $p->{long}) if $p->{long};

FormattingRule:
  @Category[list]:
    view
    view-resource
    form-input
    page-link
    link-to-resource
  @Name: em
  @Description:
    @@@: Emphasis
    @@lang: en
  @Formatting:
    my $em = $p->{-parent}->append_new_node
                                (type => '#element',
                                 namespace_uri => $NS_XHTML1,
                                 local_name => 'em');
    __ATTRNODE:%content->{$em}__;
1	wakaba	1.1	#?SuikaWikiConfig/2.0
2
3			Plugin:
4			@Name: Phrase
5			@Description:
6			@@@: Phrasal element
7			@@lang:en
8			@License: %%GPL%%
9			@Author:
10			@@Name:
11			@@@@: Wakaba
12			@@@lang:ja
13			@@@script:Latn
14			@@Mail[list]: w@suika.fam.cx
15			@Date.RCS:
16			$Date: 2004/01/16 07:54:22 $
17
18			PluginConst:
19			@NS_XHTML1:
20			http://www.w3.org/1999/xhtml
21
22
23			FormattingRule:
24			@Category[list]:
25			view
26			view-resource
27			form-input
28			page-link
29			link-to-resource
30			@Name: abbr
31			@Description:
32			@@@: Abbreviation
33			@@lang: en
34			@Formatting:
35			my $abbr = $p->{-parent}->append_new_node
36			(type => '#element',
37			namespace_uri => $NS_XHTML1,
38			local_name => 'abbr');
39			__ATTRNODE:%short->{$abbr}__;
40			__ATTRTEXT:%long__;
41			$abbr->set_attribute (title => $p->{long}) if $p->{long};
42
43			FormattingRule:
44			@Category[list]:
45			view
46			view-resource
47			form-input
48			page-link
49			link-to-resource
50			@Name: em
51			@Description:
52			@@@: Emphasis
53			@@lang: en
54			@Formatting:
55			my $em = $p->{-parent}->append_new_node
56			(type => '#element',
57			namespace_uri => $NS_XHTML1,
58			local_name => 'em');
59			__ATTRNODE:%content->{$em}__;