/[pub]/suikawiki/script/misc/plugins/link/xembed.wp2
Suika

Contents of /suikawiki/script/misc/plugins/link/xembed.wp2

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (hide annotations) (download)
Sun Jan 30 03:37:01 2005 UTC (20 years, 5 months ago) by wakaba
Branch: MAIN
CVS Tags: suikawiki3-redirect, HEAD
Branch point for: helowiki-2005, helowiki
New

1 wakaba 1.1 #?SuikaWikiConfig/2.0
2    
3     Plugin:
4     @Name: ExternalEmbedLink
5     @Description:
6     @@@:
7     Embed-style linking of external resources
8     @@lang:en
9     @License: %%Perl%%
10     @Author:
11     @@Name:
12     @@@@: Wakaba
13     @@@lang:ja
14     @@@script:Latn
15     @@Mail[list]: w@suika.fam.cx
16     @Date.RCS:
17     $Date: 2004/03/10 06:57:25 $
18     @RequiredModule[list]:
19     URI
20     @Use:
21     require URI;
22    
23     PluginConst:
24     @NS_XHTML1:
25     http://www.w3.org/1999/xhtml
26    
27     FormattingRule:
28     @Category[list]:
29     view
30     view-resource
31     form-input
32     @Name: xe--img
33     @Description:
34     @@@:
35     Embeds an external image resource.
36     \
37     STATUS: EXPERIMENTAL
38     @@lang: en
39     @Parameter:
40     @@Name: uri
41     @@Type: URI-reference
42     @@Default: (required)
43     @@Description:
44     @@@lang: en
45     @@@@: URI reference of the image to embed.
46     @Parameter:
47     @@Name: alt
48     @@Type: text
49     @@Default: (empty)
50     @@Description:
51     @@@lang:en
52     @@@@: A short description for the image.
53     @Formatting:
54     __ATTRTEXT:%uri__;
55     __ATTRTEXT:%alt__;
56     for ($p->{-parent}->append_new_node
57     (type => '#element',
58     namespace_uri => $NS_XHTML1,
59     local_name => 'img')) {
60     $_->flag (use_EmptyElemTag => 1);
61     $_->set_attribute (src => ''.URI->new ($p->{uri}));
62     $_->set_attribute (alt => $p->{alt});
63     }

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24