/[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 - (show 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 #?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