#?SuikaWikiConfig/2.0

Plugin:
  @Name: WikiFormAsLink
  @FullName:
    WikiForm: Form as hyperlink
  @Description:
    @@@:
      This plugin module provides some styles of forms
      can be used as hyperlink.
    @@lang: en
  @License: %%GPL%%
  @Author[list]:
     Wakaba <w@suika.fam.cx>
  @Date.RCS: $Date: 2004/02/01 12:08:21 $
  @RequiredModule[list]:
    WikiFormCore

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

FormattingRule:
  @Category[list]: form-input
  @Name: wfl--link-to-wikipage
  @Description:
    @@@: Linking to a WikiPage, as a form
    @@lang: en
  @Parameter:
    @@Name: content
    @@Type: format
    @@Default:""
    @@Description:
      @@@@: Form content.
      @@@lang:en
  @Formatting:
    __ATTRTEXT:%content__;
    SuikaWiki::Plugin->module_package ('WikiFormCore')
                     ->make_form_in_html
                         ($p->{-parent}, $p->{content},
                          wiki => $o->{wiki},
                          o => $o,
                          index => -1,
                          output => {
                            http_method => 'get',
                          },);

FormattingRule:
  @Category[list]:form-input
  @Name: wfl--hidden-mode
  @Description:
    @@@: Specifying mode, to be used with wfl--link-to-wikipage.
    @@lang:en
  @Parameter:
    @@Name: mode
    @@Type: mode
    @@Default:"default"
    @@Description:
      @@@: Mode name.
      @@lang:en
  @Formatting:
    for ($p->{-parent}->append_new_node
                          (type => '#element',
                           namespace_uri => $NS_XHTML1,
                           local_name => 'input')) {
      $_->set_attribute (type => 'hidden');
      $_->set_attribute (name => 'mode');
      __ATTRTEXT:%mode__;
      $_->set_attribute (value => $p->{mode} || 'default');
      $_->option (use_EmptyElemTag => 1);
    }