1 # <a name="Package <code>TWiki::Func="></a> Package =TWiki::Func
3 _Official list of stable TWiki functions for Plugin developers_
5 This module defines official functions that [[Plugins|TWiki/TWikiPlugins]] can use to interact with the TWiki engine and content.
7 Refer to [[EmptyPlugin]] and lib/TWiki/Plugins/EmptyPlugin.pm for a template Plugin and documentation on how to write a Plugin.
9 Plugins should **only** use functions published in this module. If you use functions in other TWiki libraries you might create a security hole and you will probably need to change your Plugin when you upgrade TWiki.
11 Deprecated functions will still work in older code, though they should _not_ be called in new Plugins and should be replaced in older Plugins as soon as possible.
13 The version of the TWiki::Func module is defined by the VERSION number of the TWiki::Plugins module, currently 1.11. This can be shown by the `%PLUGINVERSION%` variable. The 'Since' field in the function documentation refers to the VERSION number and the date that the function was addded.
15 **_Note:_** Beware! These methods should only ever be called from the context of a TWiki Plugin. They require a Plugins SESSION context to be established before they are called, and will not work if simply called from another TWiki module. For example,
18 print TWiki::Func::getSkin(),"\n";
20 will fail with `Can't call method "getSkin" on an undefined value at TWiki/Func.pm line 83`.
22 If you want to call the methods outside the context of a plugin, you can create a Plugins SESSION object. For example, the script:
25 $TWiki::Plugins::SESSION = new TWiki();
26 print TWiki::Func::getSkin(),"\n";
32 <li><a href="#Package =TWiki::Func="> Package TWiki::Func</a><ul>
33 <li><a href="#Environment"> Environment</a><ul>
34 <li><a href="#getSkin( ) -> $skin"> getSkin( ) -> $skin</a></li>
35 <li><a href="#get_UrlHost( ) -> $host"> getUrlHost( ) -> $host</a></li>
36 <li><a href="#get_ScriptUrl( $web, $topic, $sc"> getScriptUrl( $web, $topic, $script, ... ) -> $url</a></li>
37 <li><a href="#get_ViewUrl( $web, $topic ) -> $"> getViewUrl( $web, $topic ) -> $url</a></li>
38 <li><a href="#get_OopsUrl( $web, $topic, $temp"> getOopsUrl( $web, $topic, $template, $param1, $param2, $param3, $param4 ) -> $url</a></li>
39 <li><a href="#get_PubUrlPath( ) -> $path"> getPubUrlPath( ) -> $path</a></li>
40 <li><a href="#get_CgiQuery( ) -> $query"> getCgiQuery( ) -> $query</a></li>
41 <li><a href="#get_SessionValue( $key ) -> $val"> getSessionValue( $key ) -> $value</a></li>
42 <li><a href="#set_SessionValue( $key, $value )"> setSessionValue( $key, $value ) -> $boolean</a></li>
43 <li><a href="#clear_SessionValue( $key ) -> $b"> clearSessionValue( $key ) -> $boolean</a></li>
44 <li><a href="#getContext() -> \%hash"> getContext() -> \%hash</a></li>
47 <li><a href="#Preferences"> Preferences</a><ul>
48 <li><a href="#get_PreferencesValue( $key, $web"> getPreferencesValue( $key, $web ) -> $value</a></li>
49 <li><a href="#get_PluginPreferencesValue( $key"> getPluginPreferencesValue( $key ) -> $value</a></li>
50 <li><a href="#get_PreferencesFlag( $key, $web"> getPreferencesFlag( $key, $web ) -> $value</a></li>
51 <li><a href="#get_PluginPreferencesFlag( $key"> getPluginPreferencesFlag( $key ) -> $boolean</a></li>
52 <li><a href="#get_WikiToolName( ) -> $name"> getWikiToolName( ) -> $name</a></li>
53 <li><a href="#get_MainWebname( ) -> $name"> getMainWebname( ) -> $name</a></li>
54 <li><a href="#get_TwikiWebname( ) -> $name"> getTwikiWebname( ) -> $name</a></li>
57 <li><a href="#User Handling and Access Control"> User Handling and Access Control</a><ul>
58 <li><a href="#get_DefaultUserName( ) -> $login"> getDefaultUserName( ) -> $loginName</a></li>
59 <li><a href="#get_WikiName( ) -> $wikiName"> getWikiName( ) -> $wikiName</a></li>
60 <li><a href="#get_WikiUserName( ) -> $wikiName"> getWikiUserName( ) -> $wikiName</a></li>
61 <li><a href="#wiki_ToUserName( $wikiName ) ->"> wikiToUserName( $wikiName ) -> $loginName</a></li>
62 <li><a href="#user_ToWikiName( $loginName, $do"> userToWikiName( $loginName, $dontAddWeb ) -> $wikiName</a></li>
63 <li><a href="#isGuest( ) -> $boolean"> isGuest( ) -> $boolean</a></li>
64 <li><a href="#permissionsSet( $web ) -> $boole"> permissionsSet( $web ) -> $boolean</a></li>
65 <li><a href="#check_AccessPermission( $type, $"> checkAccessPermission( $type, $wikiName, $text, $topic, $web, $meta ) -> $boolean</a></li>
68 <li><a href="#Webs, Topics and Attachments"> Webs, Topics and Attachments</a><ul>
69 <li><a href="#get_ListOfWebs( $filter ) -> @we"> getListOfWebs( $filter ) -> @webs</a></li>
70 <li><a href="#webExists( $web ) -> $boolean"> webExists( $web ) -> $boolean</a></li>
71 <li><a href="#createWeb( $newWeb, $baseWeb, $o"> createWeb( $newWeb, $baseWeb, $opts )</a></li>
72 <li><a href="#moveWeb( $oldName, $newName )"> moveWeb( $oldName, $newName )</a></li>
73 <li><a href="#get_TopicList( $web ) -> @topics"> getTopicList( $web ) -> @topics</a></li>
74 <li><a href="#topicExists( $web, $topic ) -> $"> topicExists( $web, $topic ) -> $boolean</a></li>
75 <li><a href="#check_TopicEditLock( $web, $topi"> checkTopicEditLock( $web, $topic, $script ) -> ( $oopsUrl, $loginName, $unlockTime )</a></li>
76 <li><a href="#set_TopicEditLock( $web, $topic,"> setTopicEditLock( $web, $topic, $lock )</a></li>
77 <li><a href="#saveTopic( $web, $topic, $meta,"> saveTopic( $web, $topic, $meta, $text, $options ) -> $error</a></li>
78 <li><a href="#save_TopicText( $web, $topic, $t"> saveTopicText( $web, $topic, $text, $ignorePermissions, $dontNotify ) -> $oopsUrl</a></li>
79 <li><a href="#moveTopic( $web, $topic, $newWeb"> moveTopic( $web, $topic, $newWeb, $newTopic )</a></li>
80 <li><a href="#get_RevisionInfo($web, $topic, $"> getRevisionInfo($web, $topic, $rev, $attachment ) -> ( $date, $user, $rev, $comment ) </a></li>
81 <li><a href="#get_RevisionAtTime( $web, $topic"> getRevisionAtTime( $web, $topic, $time ) -> $rev</a></li>
82 <li><a href="#readTopic( $web, $topic, $rev )"> readTopic( $web, $topic, $rev ) -> ( $meta, $text )</a></li>
83 <li><a href="#read_TopicText( $web, $topic, $r"> readTopicText( $web, $topic, $rev, $ignorePermissions ) -> $text</a></li>
84 <li><a href="#attachmentExists( $web, $topic,"> attachmentExists( $web, $topic, $attachment ) -> $boolean</a></li>
85 <li><a href="#readAttachment( $web, $topic, $n"> readAttachment( $web, $topic, $name, $rev ) -> $data</a></li>
86 <li><a href="#saveAttachment( $web, $topic, $a"> saveAttachment( $web, $topic, $attachment, $opts )</a></li>
87 <li><a href="#moveAttachment( $web, $topic, $a"> moveAttachment( $web, $topic, $attachment, $newWeb, $newTopic, $newAttachment )</a></li>
90 <li><a href="#Assembling Pages"> Assembling Pages</a><ul>
91 <li><a href="#readTemplate( $name, $skin ) ->"> readTemplate( $name, $skin ) -> $text</a></li>
92 <li><a href="#loadTemplate ( $name, $skin, $we"> loadTemplate ( $name, $skin, $web ) -> $text</a></li>
93 <li><a href="#expandTemplate( $def ) -> $stri"> expandTemplate( $def ) -> $string</a></li>
94 <li><a href="#writeHeader( $query, $contentLen"> writeHeader( $query, $contentLength )</a></li>
95 <li><a href="#redirect_CgiQuery( $query, $url,"> redirectCgiQuery( $query, $url, $passthru )</a></li>
96 <li><a href="#add_ToHEAD( $id, $header )"> addToHEAD( $id, $header )</a></li>
97 <li><a href="#expand_CommonVariables( $text, $"> expandCommonVariables( $text, $topic, $web ) -> $text</a></li>
98 <li><a href="#renderText( $text, $web ) -> $te"> renderText( $text, $web ) -> $text</a></li>
99 <li><a href="#internalLink( $pre, $web, $topic"> internalLink( $pre, $web, $topic, $label, $anchor, $createLink ) -> $text</a></li>
102 <li><a href="#E-mail"> E-mail</a><ul>
103 <li><a href="#sendEmail ( $text, $retries ) ->"> sendEmail ( $text, $retries ) -> $error</a></li>
104 <li><a href="#wiki_ToEmail( $wikiName ) -> $em"> wikiToEmail( $wikiName ) -> $email</a></li>
107 <li><a href="#Creating New Topics"> Creating New Topics</a><ul>
108 <li><a href="#expand_VariablesOnTopicCreation"> expandVariablesOnTopicCreation ( $text ) -> $text</a></li>
111 <li><a href="#Special handlers"> Special handlers</a><ul>
112 <li><a href="#register_TagHandler( $var, \fn,"> registerTagHandler( $var, \&fn, $syntax )</a></li>
113 <li><a href="#registerRESTHandler( $alias, \fn"> registerRESTHandler( $alias, \&fn, )</a></li>
116 <li><a href="#Searching"> Searching</a><ul>
117 <li><a href="#search_InWebContent($searchStrin"> searchInWebContent($searchString, $web, \@topics, \%options ) -> \%map</a></li>
120 <li><a href="#Plugin-specific file handling"> Plugin-specific file handling</a><ul>
121 <li><a href="#get_WorkArea( $pluginName ) -> $"> getWorkArea( $pluginName ) -> $directorypath</a></li>
122 <li><a href="#readFile( $filename ) -> $text"> readFile( $filename ) -> $text</a></li>
123 <li><a href="#saveFile( $filename, $text )"> saveFile( $filename, $text )</a></li>
126 <li><a href="#General Utilities"> General Utilities</a><ul>
127 <li><a href="#get_RegularExpression( $name ) -"> getRegularExpression( $name ) -> $expr</a></li>
128 <li><a href="#normalize_WebTopicName($web, $to"> normalizeWebTopicName($web, $topic) -> ($web, $topic)</a></li>
129 <li><a href="#writeWarning( $text )"> writeWarning( $text )</a></li>
130 <li><a href="#writeDebug( $text )"> writeDebug( $text )</a></li>
131 <li><a href="#formatTime( $time, $format, $tim"> formatTime( $time, $format, $timezone ) -> $text</a></li>
132 <li><a href="#is_ValidWikiWord ( $text ) -> $b"> isValidWikiWord ( $text ) -> $boolean</a></li>
133 <li><a href="#extractParameters($attr ) -> %pa"> extractParameters($attr ) -> %params</a></li>
134 <li><a href="#extract_NameValuePair( $attr, $n"> extractNameValuePair( $attr, $name ) -> $value</a></li>
137 <li><a href="#Deprecated functions"> Deprecated functions</a><ul>
138 <li><a href="#get_ScriptUrlPath( ) -> $path"> getScriptUrlPath( ) -> $path</a></li>
139 <li><a href="#get_PublicWebList( ) -> @webs"> getPublicWebList( ) -> @webs</a></li>
140 <li><a href="#format_GmTime( $time, $format )"> formatGmTime( $time, $format ) -> $text</a></li>
141 <li><a href="#get_DataDir( ) -> $dir"> getDataDir( ) -> $dir</a></li>
142 <li><a href="#get_PubDir( ) -> $dir"> getPubDir( ) -> $dir</a></li>
143 <li><a href="#checkDependencies( $moduleName,"> checkDependencies( $moduleName, $dependenciesRef ) -> $error</a></li>
151 ## <a name="Environment"></a> Environment
153 ### <a name="getSkin( ) - $skin"></a> getSkin( ) -> $skin
155 Get the skin path, set by the `SKIN` and `COVER` preferences variables or the `skin` and `cover` CGI parameters
157 Return: `$skin` Comma-separated list of skins, e.g. `'gnu,tartan'`. Empty string if none.
159 **Since:** TWiki::Plugins::VERSION 1.000 (29 Jul 2001)
161 ### <a name="get_UrlHost( ) - $host"></a> getUrlHost( ) -> $host
163 Get protocol, domain and optional port of script URL
165 Return: `$host` URL host, e.g. `"http://example.com:80"`
167 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
169 ### <a name="get_ScriptUrl( $web, $topic, $sc"></a> getScriptUrl( $web, $topic, $script, ... ) -> $url
171 Compose fully qualified URL
173 - `$web` - Web name, e.g. `'Main'`
174 - `$topic` - Topic name, e.g. `'WebNotify'`
175 - `$script` - Script name, e.g. `'view'`
176 - `...` - an arbitrary number of name,value parameter pairs that will be url-encoded and added to the url. The special parameter name '#' is reserved for specifying an anchor. e.g. `getScriptUrl('x','y','view','#'=>'XXX',a=>1,b=>2)` will give `.../view/x/y?a=1&b=2#XXX`
178 Return: `$url` URL, e.g. `"http://example.com:80/cgi-bin/view.pl/Main/WebNotify"`
180 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
182 ### <a name="get_ViewUrl( $web, $topic ) - $u"></a> getViewUrl( $web, $topic ) -> $url
184 Compose fully qualified view URL
186 - `$web` - Web name, e.g. `'Main'`. The current web is taken if empty
187 - `$topic` - Topic name, e.g. `'WebNotify'`
189 Return: `$url` URL, e.g. `"http://example.com:80/cgi-bin/view.pl/Main/WebNotify"`
191 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
193 ### <a name="get_OopsUrl( $web, $topic, $temp"></a> getOopsUrl( $web, $topic, $template, $param1, $param2, $param3, $param4 ) -> $url
195 Compose fully qualified 'oops' dialog URL
197 - `$web` - Web name, e.g. `'Main'`. The current web is taken if empty
198 - `$topic` - Topic name, e.g. `'WebNotify'`
199 - `$template` - Oops template name, e.g. `'oopsmistake'`. The 'oops' is optional; 'mistake' will translate to 'oopsmistake'.
200 - `$param1` ... `$param4` - Parameter values for %PARAM1% ... %PARAMn% variables in template, optional
202 Return: `$url` URL, e.g. `"http://example.com:80/cgi-bin/oops.pl/ Main/WebNotify?template=oopslocked¶m1=joe"`
204 This might be used like this:
206 my $url = TWiki::Func::getOopsUrl($web, $topic, 'oopsmistake', 'I made a boo-boo');
207 TWiki::Func::redirectCgiQuery( undef, $url );
210 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
212 Since TWiki::Plugins::VERSION 1.1, the recommended approach is to throw an [[oops exception|Main/TWikiOopsExceptionDotPm]].
214 use Error qw( :try );
216 throw TWiki::OopsException($web, $topic, undef, 0, [ 'I made a boo-boo' ]);
218 and let TWiki handle the cleanup.
220 ### <a name="get_PubUrlPath( ) - $path"></a> getPubUrlPath( ) -> $path
224 Return: `$path` URL path of pub directory, e.g. `"/pub"`
226 **Since:** TWiki::Plugins::VERSION 1.000 (14 Jul 2001)
228 ### <a name="get_CgiQuery( ) - $query"></a> getCgiQuery( ) -> $query
230 Get CGI query object. Important: Plugins cannot assume that scripts run under CGI, Plugins must always test if the CGI query object is set
232 Return: `$query` CGI query object; or 0 if script is called as a shell script
234 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
236 ### <a name="get_SessionValue( $key ) - $valu"></a> getSessionValue( $key ) -> $value
238 Get a session value from the client session module
240 - `$key` - Session key
242 Return: `$value` Value associated with key; empty string if not set
244 **Since:** TWiki::Plugins::VERSION 1.000 (27 Feb 200)
246 ### <a name="set_SessionValue( $key, $value )"></a> setSessionValue( $key, $value ) -> $boolean
250 - `$key` - Session key
251 - `$value` - Value associated with key
253 Return: true if function succeeded
255 **Since:** TWiki::Plugins::VERSION 1.000 (17 Aug 2001)
257 ### <a name="clear_SessionValue( $key ) - $bo"></a> clearSessionValue( $key ) -> $boolean
259 Clear a session value that was set using `setSessionValue`.
261 - `$key` - name of value stored in session to be cleared. Note that you **cannot** clear `AUTHUSER`.
263 Return: true if the session value was cleared
265 **Since:** TWiki::Plugins::VERSION 1.1
267 ### <a name="getContext() - \%hash"></a> getContext() -> \\%hash
269 Get a hash of context identifiers representing the currently active context.
271 The context is a set of identifiers that are set during specific phases of TWiki processing. For example, each of the standard scripts in the 'bin' directory each has a context identifier - the view script has 'view', the edit script has 'edit' etc. So you can easily tell what 'type' of script your Plugin is being called within. The core context identifiers are listed in the [[TWikiTemplates]] topic. Please be careful not to overwrite any of these identifiers!
273 Context identifiers can be used to communicate between Plugins, and between Plugins and templates. For example, in [[FirstPlugin]].pm, you might write:
276 TWiki::Func::getContext()->{'MyID'} = 1;
279 This can be used in SecondPlugin.pm like this:
282 if( TWiki::Func::getContext()->{'MyID'} ) {
287 or in a template, like this:
289 %TMPL:DEF{"ON"}% Not off %TMPL:END%
290 %TMPL:DEF{"OFF"}% Not on %TMPL:END%
291 %TMPL:P{context="MyID" then="ON" else="OFF"}%
295 %IF{"context MyID" then="MyID is ON" else="MyID is OFF"}%
297 **_Note_**: **all** plugins have an **automatically generated** context identifier if they are installed and initialised. For example, if the [[FirstPlugin]] is working, the context ID 'FirstPlugin' will be set.
299 **Since:** TWiki::Plugins::VERSION 1.1
301 ## <a name="Preferences"></a> Preferences
303 ### <a name="get_PreferencesValue( $key, $web"></a> getPreferencesValue( $key, $web ) -> $value
305 Get a preferences value from TWiki or from a Plugin
307 - `$key` - Preferences key
308 - `$web` - Name of web, optional. Current web if not specified; does not apply to settings of Plugin topics
310 Return: `$value` Preferences value; empty string if not set
312 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
314 - Example for Plugin setting:
315 - [[MyPlugin]] topic has: `* Set COLOR = red`
316 - Use `"MYPLUGIN_COLOR"` for `$key`
317 - `my $color = TWiki::Func::getPreferencesValue( "MYPLUGIN_COLOR" );`
319 - Example for preferences setting:
320 - [[WebPreferences]] topic has: `* Set WEBBGCOLOR = #FFFFC0`
321 - `my $webColor = TWiki::Func::getPreferencesValue( 'WEBBGCOLOR', 'Sandbox' );`
323 **NOTE:** As of TWiki4.1, if `$NO_PREFS_IN_TOPIC` is enabled in the plugin, then preferences set in the plugin topic will be ignored.
325 ### <a name="get_PluginPreferencesValue( $key"></a> getPluginPreferencesValue( $key ) -> $value
327 Get a preferences value from your Plugin
329 - `$key` - Plugin Preferences key w/o PLUGINNAME\_ prefix.
331 Return: `$value` Preferences value; empty string if not set
333 **_Note_**: This function will will **only** work when called from the Plugin.pm file itself. it **will not work** if called from a sub-package (e.g. TWiki::Plugins::MyPlugin::MyModule)
335 **Since:** TWiki::Plugins::VERSION 1.021 (27 Mar 2004)
337 **NOTE:** As of TWiki4.1, if `$NO_PREFS_IN_TOPIC` is enabled in the plugin, then preferences set in the plugin topic will be ignored.
339 ### <a name="get_PreferencesFlag( $key, $web"></a><a name="get_PreferencesFlag( $key, $web "></a> getPreferencesFlag( $key, $web ) -> $value
341 Get a preferences flag from TWiki or from a Plugin
343 - `$key` - Preferences key
344 - `$web` - Name of web, optional. Current web if not specified; does not apply to settings of Plugin topics
346 Return: `$value` Preferences flag `'1'` (if set), or `"0"` (for preferences values `"off"`, `"no"` and `"0"`)
348 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
350 - Example for Plugin setting:
351 - [[MyPlugin]] topic has: `* Set SHOWHELP = off`
352 - Use `"MYPLUGIN_SHOWHELP"` for `$key`
353 - `my $showHelp = TWiki::Func::getPreferencesFlag( "MYPLUGIN_SHOWHELP" );`
355 **NOTE:** As of TWiki4.1, if `$NO_PREFS_IN_TOPIC` is enabled in the plugin, then preferences set in the plugin topic will be ignored.
357 ### <a name="get_PluginPreferencesFlag( $key"></a><a name="get_PluginPreferencesFlag( $key "></a> getPluginPreferencesFlag( $key ) -> $boolean
359 Get a preferences flag from your Plugin
361 - `$key` - Plugin Preferences key w/o PLUGINNAME\_ prefix.
363 Return: false for preferences values `"off"`, `"no"` and `"0"`, or values not set at all. True otherwise.
365 **_Note_**: This function will will **only** work when called from the Plugin.pm file itself. it **will not work** if called from a sub-package (e.g. TWiki::Plugins::MyPlugin::MyModule)
367 **Since:** TWiki::Plugins::VERSION 1.021 (27 Mar 2004)
369 **NOTE:** As of TWiki4.1, if `$NO_PREFS_IN_TOPIC` is enabled in the plugin, then preferences set in the plugin topic will be ignored.
371 ### <a name="get_WikiToolName( ) - $name"></a> getWikiToolName( ) -> $name
373 Get toolname as defined in TWiki.cfg
375 Return: `$name` Name of tool, e.g. `'TWiki'`
377 **Since:** TWiki::Plugins::VERSION 1.000 (27 Feb 2001)
379 ### <a name="get_MainWebname( ) - $name"></a> getMainWebname( ) -> $name
381 Get name of Main web as defined in TWiki.cfg
383 Return: `$name` Name, e.g. `'Main'`
385 **Since:** TWiki::Plugins::VERSION 1.000 (27 Feb 2001)
387 ### <a name="get_TwikiWebname( ) - $name"></a> getTwikiWebname( ) -> $name
389 Get name of TWiki documentation web as defined in TWiki.cfg
391 Return: `$name` Name, e.g. `'TWiki'`
393 **Since:** TWiki::Plugins::VERSION 1.000 (27 Feb 2001)
395 ## <a name="User Handling and Access Control"></a> User Handling and Access Control
397 ### <a name="get_DefaultUserName( ) - $loginN"></a> getDefaultUserName( ) -> $loginName
399 Get default user name as defined in the configuration as `DefaultUserLogin`
401 Return: `$loginName` Default user name, e.g. `'guest'`
403 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
405 ### <a name="get_WikiName( ) - $wikiName"></a> getWikiName( ) -> $wikiName
407 Get Wiki name of logged in user
409 Return: `$wikiName` Wiki Name, e.g. `'JohnDoe'`
411 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
413 ### <a name="get_WikiUserName( ) - $wikiName"></a> getWikiUserName( ) -> $wikiName
415 Get Wiki name of logged in user with web prefix
417 Return: `$wikiName` Wiki Name, e.g. `"Main.JohnDoe"`
419 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
421 ### <a name="wiki_ToUserName( $wikiName ) - $"></a> wikiToUserName( $wikiName ) -> $loginName
423 Translate a Wiki name to a login name based on [[Main.TWikiUsers|Main/TWikiUsers]] topic
425 - `$wikiName` - Wiki name, e.g. `'Main.JohnDoe'` or `'JohnDoe'`
427 Return: `$loginName` Login name of user, e.g. `'jdoe'`
429 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
431 ### <a name="user_ToWikiName( $loginName, $do"></a> userToWikiName( $loginName, $dontAddWeb ) -> $wikiName
433 Translate a login name to a Wiki name based on [[Main.TWikiUsers|Main/TWikiUsers]] topic
435 - `$loginName` - Login name, e.g. `'jdoe'`
436 - `$dontAddWeb` - Do not add web prefix if `"1"`
438 Return: `$wikiName` Wiki name of user, e.g. `'Main.JohnDoe'` or `'JohnDoe'`
440 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
442 ### <a name="isGuest( ) - $boolean"></a> isGuest( ) -> $boolean
444 Test if logged in user is a guest ([[TWikiGuest]])
446 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
448 ### <a name="permissionsSet( $web ) - $boolea"></a> permissionsSet( $web ) -> $boolean
450 Test if any access restrictions are set for this web, ignoring settings on individual pages
452 - `$web` - Web name, required, e.g. `'Sandbox'`
454 **Since:** TWiki::Plugins::VERSION 1.000 (27 Feb 2001)
456 ### <a name="check_AccessPermission( $type, $"></a> checkAccessPermission( $type, $wikiName, $text, $topic, $web, $meta ) -> $boolean
458 Check access permission for a topic based on the [[TWiki.TWikiAccessControl|TWiki/TWikiAccessControl]] rules
460 - `$type` - Access type, required, e.g. `'VIEW'`, `'CHANGE'`.
461 - `$wikiName` - [[WikiName]] of remote user, required, e.g. `"PeterThoeny"`. If `$wikiName` is '', 0 or `undef` then access is **always permitted**.
462 - `$text` - Topic text, optional. If 'perl false' (undef, 0 or ''), topic `$web.$topic` is consulted. `$text` may optionally contain embedded `%META:PREFERENCE` tags. Provide this parameter if:
463 1. You are setting different access controls in the text to those defined in the stored topic,
464 2. You already have the topic text in hand, and want to help TWiki avoid having to read it again,
465 3. You are providing a `$meta` parameter.
466 - `$topic` - Topic name, required, e.g. `'PrivateStuff'`
467 - `$web` - Web name, required, e.g. `'Sandbox'`
468 - `$meta` - Meta-data object, as returned by `readTopic`. Optional. If `undef`, but `$text` is defined, then access controls will be parsed from `$text`. If defined, then metadata embedded in `$text` will be ignored. This parameter is always ignored if `$text` is undefined. Settings in `$meta` override `Set` settings in $text.
470 A perl true result indicates that access is permitted.
472 **Note** the wierd parameter order is due to compatibility constraints with earlier TWiki releases.
474 **Tip** if you want, you can use this method to check your own access control types. For example, if you:
476 - Set ALLOWTOPICSPIN = [[IncyWincy]]
478 in `ThatWeb.ThisTopic`, then a call to `checkAccessPermissions('SPIN', 'IncyWincy', undef, 'ThisTopic', 'ThatWeb', undef)` will return `true`.
480 **Since:** TWiki::Plugins::VERSION 1.000 (27 Feb 2001)
482 ## <a name="Webs, Topics and Attachments"></a> Webs, Topics and Attachments
484 ### <a name="get_ListOfWebs( $filter ) - @web"></a> getListOfWebs( $filter ) -> @webs
486 - `$filter` - spec of web types to recover
488 Gets a list of webs, filtered according to the spec in the $filter, which may include one of:
490 1. 'user' (for only user webs)
491 2. 'template' (for only template webs i.e. those starting with "\_")
493 `$filter` may also contain the word 'public' which will further filter out webs that have NOSEARCHALL set on them. 'allowed' filters out webs the current user can't read.
495 For example, the deprecated getPublicWebList function can be duplicated as follows:
497 my @webs = TWiki::Func::getListOfWebs( "user,public" );
499 **Since:** TWiki::Plugins::VERSION 1.1
501 ### <a name="webExists( $web ) - $boolean"></a> webExists( $web ) -> $boolean
505 - `$web` - Web name, required, e.g. `'Sandbox'`
507 **Since:** TWiki::Plugins::VERSION 1.000 (14 Jul 2001)
509 ### <a name="createWeb( $newWeb, $baseWeb, $o"></a> createWeb( $newWeb, $baseWeb, $opts )
511 - `$newWeb` is the name of the new web.
512 - `$baseWeb` is the name of an existing web (a template web). If the base web is a system web, all topics in it will be copied into the new web. If it is a normal web, only topics starting with 'Web' will be copied. If no base web is specified, an empty web (with no topics) will be created. If it is specified but does not exist, an error will be thrown.
513 - `$opts` is a ref to a hash that contains settings to be modified in
515 the web preferences topic in the new web.
517 use Error qw( :try );
518 use TWiki::AccessControlException;
521 TWiki::Func::createWeb( "Newweb" );
522 } catch Error::Simple with {
524 # see documentation on Error::Simple
525 } catch TWiki::AccessControlException with {
527 # see documentation on TWiki::AccessControlException
532 **Since:** TWiki::Plugins::VERSION 1.1
534 ### <a name="moveWeb( $oldName, $newName )"></a> moveWeb( $oldName, $newName )
538 use Error qw( :try );
539 use TWiki::AccessControlException;
542 TWiki::Func::moveWeb( "Oldweb", "Newweb" );
543 } catch Error::Simple with {
545 # see documentation on Error::Simple
546 } catch TWiki::AccessControlException with {
548 # see documentation on TWiki::AccessControlException
553 To delete a web, move it to a subweb of `Trash`
555 TWiki::Func::moveWeb( "Deadweb", "Trash.Deadweb" );
557 **Since:** TWiki::Plugins::VERSION 1.1
559 ### <a name="get_TopicList( $web ) - @topics"></a> getTopicList( $web ) -> @topics
561 Get list of all topics in a web
563 - `$web` - Web name, required, e.g. `'Sandbox'`
565 Return: `@topics` Topic list, e.g. `( 'WebChanges', 'WebHome', 'WebIndex', 'WebNotify' )`
567 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
569 ### <a name="topicExists( $web, $topic ) - $b"></a> topicExists( $web, $topic ) -> $boolean
573 - `$web` - Web name, optional, e.g. `'Main'`.
574 - `$topic` - Topic name, required, e.g. `'TokyoOffice'`, or `"Main.TokyoOffice"`
576 $web and $topic are parsed as described in the documentation for `normalizeWebTopicName`.
578 **Since:** TWiki::Plugins::VERSION 1.000 (14 Jul 2001)
580 ### <a name="check_TopicEditLock( $web, $topi"></a> checkTopicEditLock( $web, $topic, $script ) -> ( $oopsUrl, $loginName, $unlockTime )
582 Check if a lease has been taken by some other user.
584 - `$web` Web name, e.g. `"Main"`, or empty
585 - `$topic` Topic name, e.g. `"MyTopic"`, or `"Main.MyTopic"`
587 Return: `( $oopsUrl, $loginName, $unlockTime )` - The `$oopsUrl` for calling redirectCgiQuery(), user's `$loginName`, and estimated `$unlockTime` in minutes, or ( '', '', 0 ) if no lease exists.
589 - `$script` The script to invoke when continuing with the edit
591 **Since:** TWiki::Plugins::VERSION 1.010 (31 Dec 2002)
593 ### <a name="set_TopicEditLock( $web, $topic,"></a> setTopicEditLock( $web, $topic, $lock )
595 - `$web` Web name, e.g. `"Main"`, or empty
596 - `$topic` Topic name, e.g. `"MyTopic"`, or `"Main.MyTopic"`
597 - `$lock` 1 to lease the topic, 0 to clear the lease=
599 Takes out a "lease" on the topic. The lease doesn't prevent anyone from editing and changing the topic, but it does redirect them to a warning screen, so this provides some protection. The `edit` script always takes out a lease.
601 It is **impossible** to fully lock a topic. Concurrent changes will be merged.
603 **Since:** TWiki::Plugins::VERSION 1.010 (31 Dec 2002)
605 ### <a name="saveTopic( $web, $topic, $meta,"></a><a name="saveTopic( $web, $topic, $meta, "></a> saveTopic( $web, $topic, $meta, $text, $options ) -> $error
607 - `$web` - web for the topic
608 - `$topic` - topic name
609 - `$meta` - reference to TWiki::Meta object
610 - `$text` - text of the topic (without embedded meta-data!!!
611 - `\%options` - ref to hash of save options `\%options` may include: <table border="1" cellpadding="0" cellspacing="0">
613 <td><code>dontlog</code></td>
614 <td> don't log this change in twiki log </td>
617 <td><code>comment</code></td>
618 <td> comment for save </td>
621 <td><code>minor</code></td>
622 <td> True if this is a minor change, and is not to be notified </td>
626 Return: error message or undef.
628 **Since:** TWiki::Plugins::VERSION 1.000 (29 Jul 2001)
632 my( $meta, $text ) = TWiki::Func::readTopic( $web, $topic )
633 $text =~ s/APPLE/ORANGE/g;
634 TWiki::Func::saveTopic( $web, $topic, $meta, $text, { comment => 'refruited' } );
636 **_Note:_** Plugins handlers ( e.g. `beforeSaveHandler` ) will be called as appropriate.
638 ### <a name="save_TopicText( $web, $topic, $t"></a> saveTopicText( $web, $topic, $text, $ignorePermissions, $dontNotify ) -> $oopsUrl
640 Save topic text, typically obtained by readTopicText(). Topic data usually includes meta data; the file attachment meta data is replaced by the meta data from the topic file if it exists.
642 - `$web` - Web name, e.g. `'Main'`, or empty
643 - `$topic` - Topic name, e.g. `'MyTopic'`, or `"Main.MyTopic"`
644 - `$text` - Topic text to save, assumed to include meta data
645 - `$ignorePermissions` - Set to `"1"` if checkAccessPermission() is already performed and OK
646 - `$dontNotify` - Set to `"1"` if not to notify users of the change
648 Return: `$oopsUrl` Empty string if OK; the `$oopsUrl` for calling redirectCgiQuery() in case of error
650 This method is a lot less efficient and much more dangerous than `saveTopic`.
652 **Since:** TWiki::Plugins::VERSION 1.010 (31 Dec 2002)
654 my $text = TWiki::Func::readTopicText( $web, $topic );
656 # check for oops URL in case of error:
657 if( $text =~ /^http.*?\/oops/ ) {
658 TWiki::Func::redirectCgiQuery( $query, $text );
661 # do topic text manipulation like:
662 $text =~ s/old/new/g;
663 # do meta data manipulation like:
664 $text =~ s/(META\:FIELD.*?name\=\"TopicClassification\".*?value\=\")[^\"]*/$1BugResolved/;
665 $oopsUrl = TWiki::Func::saveTopicText( $web, $topic, $text ); # save topic text
667 ### <a name="moveTopic( $web, $topic, $newWeb"></a> moveTopic( $web, $topic, $newWeb, $newTopic )
669 - `$web` source web - required
670 - `$topic` source topic - required
672 - `$newTopic` dest topic
674 Renames the topic. Throws an exception if something went wrong. If $newWeb is undef, it defaults to $web. If $newTopic is undef, it defaults to $topic.
676 The destination topic must not already exist.
678 Rename a topic to the $TWiki::cfg\{TrashWebName\} to delete it.
680 **Since:** TWiki::Plugins::VERSION 1.1
682 use Error qw( :try );
685 moveTopic( "Work", "TokyoOffice", "Trash", "ClosedOffice" );
686 } catch Error::Simple with {
688 # see documentation on Error::Simple
689 } catch TWiki::AccessControlException with {
691 # see documentation on TWiki::AccessControlException
696 ### <a name="get_RevisionInfo($web, $topic, $"></a> getRevisionInfo($web, $topic, $rev, $attachment ) -> ( $date, $user, $rev, $comment )
698 Get revision info of a topic or attachment
700 - `$web` - Web name, optional, e.g. `'Main'`
701 - `$topic` - Topic name, required, e.g. `'TokyoOffice'`
702 - `$rev` - revsion number, or tag name (can be in the format 1.2, or just the minor number)
703 - `$attachment` -attachment filename
705 Return: `( $date, $user, $rev, $comment )` List with: ( last update date, login name of last user, minor part of top revision number ), e.g. `( 1234561, 'phoeny', "5" )`
707 <table border="1" cellpadding="0" cellspacing="0">
710 <td> in epochSec </td>
714 <td> Wiki name of the author (<strong>not</strong> login name) </td>
718 <td> actual rev number </td>
722 <td> WHAT COMMENT? </td>
726 NOTE: if you are trying to get revision info for a topic, use `$meta->getRevisionInfo` instead if you can - it is significantly more efficient, and returns a user object that contains other user information.
728 NOTE: prior versions of TWiki may under some circumstances have returned the login name of the user rather than the wiki name; the code documentation was totally unclear, and we have been unable to establish the intent. However the wikiname is obviously more useful, so that is what is returned.
730 **Since:** TWiki::Plugins::VERSION 1.000 (29 Jul 2001)
732 ### <a name="get_RevisionAtTime( $web, $topic"></a> getRevisionAtTime( $web, $topic, $time ) -> $rev
734 Get the revision number of a topic at a specific time.
736 - `$web` - web for topic
738 - `$time` - time (in epoch secs) for the rev
740 Return: Single-digit revision number, or undef if it couldn't be determined (either because the topic isn't that old, or there was a problem)
742 **Since:** TWiki::Plugins::VERSION 1.1
744 ### <a name="readTopic( $web, $topic, $rev )"></a><a name="readTopic( $web, $topic, $rev ) "></a> readTopic( $web, $topic, $rev ) -> ( $meta, $text )
746 Read topic text and meta data, regardless of access permissions.
748 - `$web` - Web name, required, e.g. `'Main'`
749 - `$topic` - Topic name, required, e.g. `'TokyoOffice'`
750 - `$rev` - revision to read (default latest)
752 Return: `( $meta, $text )` Meta data object and topic text
754 `$meta` is a perl 'object' of class `TWiki::Meta`. This class is fully documented in the source code documentation shipped with the release, or can be inspected in the `lib/TWiki/Meta.pm` file.
756 This method **ignores** topic access permissions. You should be careful to use `checkAccessPermissions` to ensure the current user has read access to the topic.
758 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
760 ### <a name="read_TopicText( $web, $topic, $r"></a> readTopicText( $web, $topic, $rev, $ignorePermissions ) -> $text
762 Read topic text, including meta data
764 - `$web` - Web name, e.g. `'Main'`, or empty
765 - `$topic` - Topic name, e.g. `'MyTopic'`, or `"Main.MyTopic"`
766 - `$rev` - Topic revision to read, optional. Specify the minor part of the revision, e.g. `"5"`, not `"1.5"`; the top revision is returned if omitted or empty.
767 - `$ignorePermissions` - Set to `"1"` if checkAccessPermission() is already performed and OK; an oops URL is returned if user has no permission
769 Return: `$text` Topic text with embedded meta data; an oops URL for calling redirectCgiQuery() is returned in case of an error
771 This method is more efficient than `readTopic`, but returns meta-data embedded in the text. Plugins authors must be very careful to avoid damaging meta-data. You are recommended to use readTopic instead, which is a lot safer..
773 **Since:** TWiki::Plugins::VERSION 1.010 (31 Dec 2002)
775 ### <a name="attachmentExists( $web, $topic,"></a><a name="attachmentExists( $web, $topic, "></a> attachmentExists( $web, $topic, $attachment ) -> $boolean
777 Test if attachment exists
779 - `$web` - Web name, optional, e.g. `Main`.
780 - `$topic` - Topic name, required, e.g. `TokyoOffice`, or `Main.TokyoOffice`
781 - `$attachment` - attachment name, e.g.=logo.gif=
783 $web and $topic are parsed as described in the documentation for `normalizeWebTopicName`.
785 **Since:** TWiki::Plugins::VERSION 1.1
787 ### <a name="readAttachment( $web, $topic, $n"></a> readAttachment( $web, $topic, $name, $rev ) -> $data
789 - `$web` - web for topic
791 - `$name` - attachment name
792 - `$rev` - revision to read (default latest)
794 Read an attachment from the store for a topic, and return it as a string. The names of attachments on a topic can be recovered from the meta-data returned by `readTopic`. If the attachment does not exist, or cannot be read, undef will be returned. If the revision is not specified, the latest version will be returned.
796 View permission on the topic is required for the read to be successful. Access control violations are flagged by a TWiki::AccessControlException. Permissions are checked for the current user.
798 my( $meta, $text ) = TWiki::Func::readTopic( $web, $topic );
799 my @attachments = $meta->find( 'FILEATTACHMENT' );
800 foreach my $a ( @attachments ) {
802 my $data = TWiki::Func::readAttachment( $web, $topic, $a->{name} );
804 } catch TWiki::AccessControlException with {
808 **Since:** TWiki::Plugins::VERSION 1.1
810 ### <a name="saveAttachment( $web, $topic, $a"></a> saveAttachment( $web, $topic, $attachment, $opts )
812 - `$web` - web for topic
813 - `$topic` - topic to atach to
814 - `$attachment` - name of the attachment
815 - `$opts` - Ref to hash of options
819 <table border="1" cellpadding="0" cellspacing="0">
821 <td><code>dontlog</code></td>
822 <td> don't log this change in twiki log </td>
825 <td><code>comment</code></td>
826 <td> comment for save </td>
829 <td><code>hide</code></td>
830 <td> if the attachment is to be hidden in normal topic view </td>
833 <td><code>stream</code></td>
834 <td> Stream of file to upload </td>
837 <td><code>file</code></td>
838 <td> Name of a file to use for the attachment data. ignored if stream is set. Local file on the server. </td>
841 <td><code>filepath</code></td>
842 <td> Client path to file </td>
845 <td><code>filesize</code></td>
846 <td> Size of uploaded data </td>
849 <td><code>filedate</code></td>
854 Save an attachment to the store for a topic. On success, returns undef. If there is an error, an exception will be thrown.
857 TWiki::Func::saveAttachment( $web, $topic, 'image.gif',
858 { file => 'image.gif',
859 comment => 'Picture of Health',
861 } catch Error::Simple with {
862 # see documentation on Error
867 **Since:** TWiki::Plugins::VERSION 1.1
869 ### <a name="moveAttachment( $web, $topic, $a"></a> moveAttachment( $web, $topic, $attachment, $newWeb, $newTopic, $newAttachment )
871 - `$web` source web - required
872 - `$topic` source topic - required
873 - `$attachment` source attachment - required
875 - `$newTopic` dest topic
876 - `$newAttachment` dest attachment
878 Renames the topic. Throws an exception on error or access violation. If $newWeb is undef, it defaults to $web. If $newTopic is undef, it defaults to $topic. If $newAttachment is undef, it defaults to $attachment. If all of $newWeb, $newTopic and $newAttachment are undef, it is an error.
880 The destination topic must already exist, but the destination attachment must **not** exist.
882 Rename an attachment to $TWiki::cfg\{TrashWebName\}.TrashAttament to delete it.
884 use Error qw( :try );
887 # move attachment between topics
888 moveAttachment( "Countries", "Germany", "AlsaceLorraine.dat",
889 "Countries", "France" );
890 # Note destination attachment name is defaulted to the same as source
891 } catch TWiki::AccessControlException with {
893 # see documentation on TWiki::AccessControlException
894 } catch Error::Simple with {
896 # see documentation on Error::Simple
899 **Since:** TWiki::Plugins::VERSION 1.1
901 ## <a name="Assembling Pages"></a> Assembling Pages
903 ### <a name="readTemplate( $name, $skin ) - $"></a> readTemplate( $name, $skin ) -> $text
905 Read a template or skin. Embedded [[template directives|TWiki/TWikiTemplates]] get expanded
907 - `$name` - Template name, e.g. `'view'`
908 - `$skin` - Comma-separated list of skin names, optional, e.g. `'print'`
910 Return: `$text` Template text
912 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
914 ### <a name="loadTemplate ( $name, $skin, $we"></a> loadTemplate ( $name, $skin, $web ) -> $text
916 - `$name` - template file name
917 - `$skin` - comma-separated list of skins to use (default: current skin)
918 - `$web` - the web to look in for topics that contain templates (default: current web)
920 Return: expanded template text (what's left after removal of all %TMPL:DEF% statements)
922 **Since:** TWiki::Plugins::VERSION 1.1
924 Reads a template and extracts template definitions, adding them to the list of loaded templates, overwriting any previous definition.
926 How TWiki searches for templates is described in [[TWikiTemplates]].
928 If template text is found, extracts include statements and fully expands them.
930 ### <a name="expandTemplate( $def ) - $strin"></a> expandTemplate( $def ) -> $string
932 Do a , only expanding the template (not expanding any variables other than %TMPL)
934 - `$def` - template name
936 Return: the text of the expanded template
938 **Since:** TWiki::Plugins::VERSION 1.1
940 A template is defined using a %TMPL:DEF% statement in a template file. See the documentation on TWiki templates for more information.
942 ### <a name="writeHeader( $query, $contentLen"></a> writeHeader( $query, $contentLength )
944 Prints a basic content-type HTML header for text/html to standard out
946 - `$query` - CGI query object. If not given, the default CGI query will be used. In most cases you should _not_ pass this parameter.
947 - `$contentLength` - Length of content
951 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
953 ### <a name="redirect_CgiQuery( $query, $url,"></a> redirectCgiQuery( $query, $url, $passthru )
957 - `$query` - CGI query object. Ignored, only there for compatibility. The session CGI query object is used instead.
958 - `$url` - URL to redirect to
959 - `$passthru` - enable passthrough.
963 Print output to STDOUT that will cause a 302 redirect to a new URL. Nothing more should be printed to STDOUT after this method has been called.
965 The `$passthru` parameter allows you to pass the parameters that were passed to the current query on to the target URL, as long as it is another URL on the same TWiki installation. If `$passthru` is set to a true value, then TWiki will save the current URL parameters, and then try to restore them on the other side of the redirect. Parameters are stored on the server in a cache file (see `{PassthroughDir} in =configure`).
967 Note that if `$passthru` is set, then any parameters in `$url` will be lost when the old parameters are restored. if you want to change any parameter values, you will need to do that in the current CGI query before redirecting e.g.
969 my $query = TWiki::Func::getCgiQuery();
970 $query->param(-name => 'text', -value => 'Different text');
971 TWiki::Func::redirectCgiQuery(
972 undef, TWiki::Func::getScriptUrl($web, $topic, 'edit'), 1);
974 `$passthru` does nothing if `$url` does not point to a script in the current TWiki installation.
976 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
978 ### <a name="add_ToHEAD( $id, $header )"></a> addToHEAD( $id, $header )
980 Adds `$header` to the HTML header (the
982 tag). This is useful for Plugins that want to include some javascript custom css.
984 - `$id` - Unique ID to prevent the same HTML from being duplicated. Plugins should use a prefix to prevent name clashes (e.g EDITTABLEPLUGIN\_JSCALENDAR)
985 - `$header` - the HTML to be added to the
987 section. The HTML must be valid in a HEAD tag - no checks are performed.
989 All TWiki variables present in `$header` will be expanded before being inserted into the ``
993 Note that this is _not_ the same as the HTTP header, which is modified through the Plugins `modifyHeaderHandler`.
995 **Since:** TWiki::Plugins::VERSION 1.1
999 TWiki::Func::addToHEAD('PATTERN_STYLE','<link id="twikiLayoutCss" rel="stylesheet" type="text/css" href="%PUBURL%/TWiki/PatternSkin/layout.css" media="all" />')
1001 ### <a name="expand_CommonVariables( $text, $"></a> expandCommonVariables( $text, $topic, $web ) -> $text
1003 Expand all common `%VARIABLES%`
1005 - `$text` - Text with variables to expand, e.g. `'Current user is %WIKIUSER%'`
1006 - `$topic` - Current topic name, e.g. `'WebNotify'`
1007 - `$web` - Web name, optional, e.g. `'Main'`. The current web is taken if missing
1009 Return: `$text` Expanded text, e.g. `'Current user is TWikiGuest'`
1011 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
1013 See also: expandVariablesOnTopicCreation
1015 ### <a name="renderText( $text, $web ) - $tex"></a> renderText( $text, $web ) -> $text
1017 Render text from TWiki markup into XHTML as defined in [[TWiki.TextFormattingRules|TWiki/TextFormattingRules]]
1019 - `$text` - Text to render, e.g. `'*bold* text and =fixed font='`
1020 - `$web` - Web name, optional, e.g. `'Main'`. The current web is taken if missing
1022 Return: `$text` XHTML text, e.g. `'<b>bold</b> and <code>fixed font</code>'`
1024 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
1026 ### <a name="internalLink( $pre, $web, $topic"></a> internalLink( $pre, $web, $topic, $label, $anchor, $createLink ) -> $text
1028 Render topic name and link label into an XHTML link. Normally you do not need to call this funtion, it is called internally by `renderText()`
1030 - `$pre` - Text occuring before the TWiki link syntax, optional
1031 - `$web` - Web name, required, e.g. `'Main'`
1032 - `$topic` - Topic name to link to, required, e.g. `'WebNotify'`
1033 - `$label` - Link label, required. Usually the same as `$topic`, e.g. `'notify'`
1034 - `$anchor` - Anchor, optional, e.g. `'#Jump'`
1035 - `$createLink` - Set to `'1'` to add question linked mark after topic name if topic does not exist;<br /> set to `'0'` to suppress link for non-existing topics
1037 Return: `$text` XHTML anchor, e.g. `'<a href='/cgi-bin/view/Main/WebNotify#Jump'>notify</a>'`
1039 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
1041 ## <a name="E-mail"></a> E-mail
1043 ### <a name="sendEmail ( $text, $retries ) -"></a><a name="sendEmail ( $text, $retries ) - "></a> sendEmail ( $text, $retries ) -> $error
1045 - `$text` - text of the mail, including MIME headers
1046 - `$retries` - number of times to retry the send (default 1)
1048 Send an e-mail specified as MIME format content. To specify MIME format mails, you create a string that contains a set of header lines that contain field definitions and a message body such as:
1050 To: liz@windsor.gov.uk
1051 From: serf@hovel.net
1052 CC: george@whitehouse.gov
1057 Please abolish the monarchy (with King George's permission, of course)
1063 Leave a blank line between the last header field and the message body.
1065 **Since:** TWiki::Plugins::VERSION 1.1
1067 ### <a name="wiki_ToEmail( $wikiName ) - $ema"></a> wikiToEmail( $wikiName ) -> $email
1069 - `$wikiName` - wiki name of the user
1071 Get the e-mail address(es) of the named user. If the user has multiple e-mail addresses (for example, the user is a group), then the list will be comma-separated.
1073 **Since:** TWiki::Plugins::VERSION 1.1
1075 ## <a name="Creating New Topics"></a> Creating New Topics
1077 ### <a name="expand_VariablesOnTopicCreation"></a><a name="expand_VariablesOnTopicCreation "></a> expandVariablesOnTopicCreation ( $text ) -> $text
1079 Expand the limited set of variables that are always expanded during topic creation
1081 - `$text` - the text to process
1083 Return: text with variables expanded
1085 **Since:** TWiki::Plugins::VERSION 1.1
1087 Expands only the variables expected in templates that must be statically expanded in new content.
1089 The expanded variables are:
1091 - `%DATE%` Signature-format date
1092 - `%SERVERTIME%` See [[TWikiVariables]]
1093 - `%GMTIME%` See [[TWikiVariables]]
1094 - `%USERNAME%` Base login name
1095 - `%WIKINAME%` Wiki name
1096 - `%WIKIUSERNAME%` Wiki name with prepended web
1097 - `%URLPARAM{...}%` - Parameters to the current CGI query
1100 See also: expandVariables
1102 ## <a name="Special handlers"></a> Special handlers
1104 Special handlers can be defined to make functions in plugins behave as if they were built-in to TWiki.
1106 ### <a name="register_TagHandler( $var, \fn,"></a><a name="register_TagHandler( $var, \fn, "></a> registerTagHandler( $var, \\&fn, $syntax )
1108 Should only be called from initPlugin.
1110 Register a function to handle a simple variable. Handles both %VAR% and %VAR\{...\}%. Registered variables are treated the same as TWiki internal variables, and are expanded at the same time. This is a _lot_ more efficient than using the `commonTagsHandler`.
1112 - `$var` - The name of the variable, i.e. the 'MYVAR' part of %MYVAR%. The variable name **must** match /^[A-Z]\[A-Z0-9\_]\*$/ or it won't work.
1113 - `\&fn` - Reference to the handler function.
1114 - `$syntax` can be 'classic' (the default) or 'context-free'. 'classic' syntax is appropriate where you want the variable to support classic TWiki syntax i.e. to accept the standard `%MYVAR{ "unnamed" param1="value1" param2="value2" }%` syntax, as well as an unquoted default parameter, such as `%MYVAR{unquoted parameter}%`. If your variable will only use named parameters, you can use 'context-free' syntax, which supports a more relaxed syntax. For example, %MYVAR\{param1=value1, value 2, param3="value 3", param4='value 5"\}%
1116 **Since:** TWiki::Plugins::VERSION 1.1
1118 The variable handler function must be of the form:
1120 sub handler(\%session, \%params, $topic, $web)
1124 - `\%session` - a reference to the TWiki session object (may be ignored)
1125 - `\%params` - a reference to a TWiki::Attrs object containing parameters. This can be used as a simple hash that maps parameter names to values, with \_DEFAULT being the name for the default parameter.
1126 - `$topic` - name of the topic in the query
1127 - `$web` - name of the web in the query
1129 for example, to execute an arbitrary command on the server, you might do this:
1132 TWiki::Func::registerTagHandler('EXEC', \&boo);
1136 my( $session, $params, $topic, $web ) = @_;
1137 my $cmd = $params->{_DEFAULT};
1139 return "NO COMMAND SPECIFIED" unless $cmd;
1141 my $result = `$cmd 2>&1`;
1142 return $params->{silent} ? '' : $result;
1146 would let you do this: `%EXEC{"ps -Af" silent="on"}%`
1148 Registered tags differ from tags implemented using the old TWiki approach (text substitution in `commonTagsHandler`) in the following ways:
1150 - registered tags are evaluated at the same time as system tags, such as %SERVERTIME. `commonTagsHandler` is only called later, when all system tags have already been expanded (though they are expanded _again_ after `commonTagsHandler` returns).
1151 - registered tag names can only contain alphanumerics and \_ (underscore)
1152 - registering a tag `FRED` defines both `%FRED{...}%` **and also** `%FRED%`.
1153 - registered tag handlers **cannot** return another tag as their only result (e.g. `return '%SERVERTIME%';`). It won't work.
1155 ### <a name="registerRESTHandler( $alias, \fn"></a> registerRESTHandler( $alias, \\&fn, )
1157 Should only be called from initPlugin.
1159 Adds a function to the dispatch table of the REST interface
1161 - `$alias` - The name .
1162 - `\&fn` - Reference to the function.
1164 **Since:** TWiki::Plugins::VERSION 1.1
1166 The handler function must be of the form:
1168 sub handler(\%session)
1172 - `\%session` - a reference to the TWiki session object (may be ignored)
1174 From the REST interface, the name of the plugin must be used as the subject of the invokation.
1180 The [[EmptyPlugin]] has the following call in the initPlugin handler:
1182 TWiki::Func::registerRESTHandler('example', \&restExample);
1184 This adds the `restExample` function to the REST dispatch table for the [[EmptyPlugin]] under the 'example' alias, and allows it to be invoked using the URL
1186 `http://server:port/bin/rest/EmptyPlugin/example`
1190 `http://server:port/bin/rest/EmptyPlugin/restExample`
1192 (ie, with the name of the function instead of the alias) will not work.
1194 ## <a name="Searching"></a> Searching
1196 ### <a name="search_InWebContent($searchStrin"></a> searchInWebContent($searchString, $web, \\@topics, \\%options ) -> \\%map
1198 Search for a string in the content of a web. The search is over all content, including meta-data. Meta-data matches will be returned as formatted lines within the topic content (meta-data matches are returned as lines of the format %META:\\w+\{.\*\}%)
1200 - `$searchString` - the search string, in egrep format
1201 - `$web` - The web to search in
1202 - `\@topics` - reference to a list of topics to search
1203 - `\%option` - reference to an options hash
1205 The `\%options` hash may contain the following options:
1207 - `type` - if `regex` will perform a egrep-syntax RE search (default '')
1208 - `casesensitive` - false to ignore case (defaulkt true)
1209 - `files_without_match` - true to return files only (default false). If `files_without_match` is specified, it will return on the first match in each topic (i.e. it will return only one match per topic, and will not return matching lines).
1211 The return value is a reference to a hash which maps each matching topic name to a list of the lines in that topic that matched the search, as would be returned by 'grep'.
1213 To iterate over the returned topics use:
1215 my $result = TWiki::Func::searchInWebContent( "Slimy Toad", $web, \@topics,
1216 { casesensitive => 0, files_without_match => 0 } );
1217 foreach my $topic (keys %$result ) {
1218 foreach my $matching_line ( @{$result->{$topic}} ) {
1221 **Since:** TWiki::Plugins::VERSION 1.1
1223 ## <a name="Plugin-specific file handling"></a> Plugin-specific file handling
1225 ### <a name="get_WorkArea( $pluginName ) - $d"></a> getWorkArea( $pluginName ) -> $directorypath
1227 Gets a private directory for Plugin use. The Plugin is entirely responsible for managing this directory; TWiki will not read from it, or write to it.
1229 The directory is guaranteed to exist, and to be writable by the webserver user. By default it will **not** be web accessible.
1231 The directory and it's contents are permanent, so Plugins must be careful to keep their areas tidy.
1233 **Since:** TWiki::Plugins::VERSION 1.1 (Dec 2005)
1235 ### <a name="readFile( $filename ) - $text"></a> readFile( $filename ) -> $text
1237 Read file, low level. Used for Plugin workarea.
1239 - `$filename` - Full path name of file
1241 Return: `$text` Content of file, empty if not found
1243 **_NOTE:_** Use this function only for the Plugin workarea, **not** for topics and attachments. Use the appropriate functions to manipulate topics and attachments.
1245 **Since:** TWiki::Plugins::VERSION 1.000 (07 Dec 2002)
1247 ### <a name="saveFile( $filename, $text )"></a> saveFile( $filename, $text )
1249 Save file, low level. Used for Plugin workarea.
1251 - `$filename` - Full path name of file
1252 - `$text` - Text to save
1256 **_NOTE:_** Use this function only for the Plugin workarea, **not** for topics and attachments. Use the appropriate functions to manipulate topics and attachments.
1258 **Since:** TWiki::Plugins::VERSION 1.000 (07 Dec 2002)
1260 ## <a name="General Utilities"></a> General Utilities
1262 ### <a name="get_RegularExpression( $name ) -"></a> getRegularExpression( $name ) -> $expr
1264 Retrieves a TWiki predefined regular expression or character class.
1266 - `$name` - Name of the expression to retrieve. See notes below
1268 Return: String or precompiled regular expression matching as described below.
1270 **Since:** TWiki::Plugins::VERSION 1.020 (9 Feb 2004)
1272 **_Note:_** TWiki internally precompiles several regular expressions to represent various string entities in an I18N-compatible manner. Plugins authors are encouraged to use these in matching where appropriate. The following are guaranteed to be present. Others may exist, but their use is unsupported and they may be removed in future TWiki versions.
1274 In the table below, the expression marked type 'String' are intended for use within character classes (i.e. for use within square brackets inside a regular expression), for example:
1276 my $upper = TWiki::Func::getRegularExpression('upperAlpha');
1277 my $alpha = TWiki::Func::getRegularExpression('mixedAlpha');
1278 my $capitalized = qr/[$upper][$alpha]+/;
1280 Those expressions marked type 'RE' are precompiled regular expressions that can be used outside square brackets. For example:
1282 my $webRE = TWiki::Func::getRegularExpression('webNameRegex');
1283 my $isWebName = ( $s =~ m/$webRE/ );
1285 <table border="1" cellpadding="0" cellspacing="0">
1287 <th bgcolor="#99CCCC"><strong> Name </strong></th>
1288 <th bgcolor="#99CCCC"><strong> Matches </strong></th>
1289 <th bgcolor="#99CCCC"><strong> Type </strong></th>
1292 <td> upperAlpha </td>
1293 <td> Upper case characters </td>
1297 <td> upperAlphaNum </td>
1298 <td> Upper case characters and digits </td>
1302 <td> lowerAlpha </td>
1303 <td> Lower case characters </td>
1307 <td> lowerAlphaNum </td>
1308 <td> Lower case characters and digits </td>
1317 <td> mixedAlpha </td>
1318 <td> Alphabetic characters </td>
1322 <td> mixedAlphaNum </td>
1323 <td> Alphanumeric characters </td>
1327 <td> wikiWordRegex </td>
1328 <td>[[Main/WikiWords]]</td>
1332 <td> webNameRegex </td>
1333 <td> User web names </td>
1337 <td> anchorRegex </td>
1338 <td> #AnchorNames </td>
1342 <td> abbrevRegex </td>
1343 <td> Abbreviations e.g. GOV, IRS </td>
1347 <td> emailAddrRegex </td>
1348 <td><a href="mailto:email@address.com">email@address.com</a></td>
1352 <td> tagNameRegex </td>
1353 <td> Standard variable names e.g. %THIS_BIT% (THIS_BIT only) </td>
1358 ### <a name="normalize_WebTopicName($web, $to"></a> normalizeWebTopicName($web, $topic) -> ($web, $topic)
1360 Parse a web and topic name, supplying defaults as appropriate.
1362 - `$web` - Web name, identifying variable, or empty string
1363 - `$topic` - Topic name, may be a web.topic string, required.
1365 Return: the parsed Web/Topic pair
1367 **Since:** TWiki::Plugins::VERSION 1.1
1369 <table border="1" cellpadding="0" cellspacing="0">
1371 <th bgcolor="#99CCCC"><strong> Input </strong></th>
1372 <th bgcolor="#99CCCC"><strong> Return </strong></th>
1375 <td><tt>( 'Web', 'Topic' ) </tt></td>
1376 <td><tt>( 'Web', 'Topic' ) </tt></td>
1379 <td><tt>( '', 'Topic' ) </tt></td>
1380 <td><tt>( 'Main', 'Topic' ) </tt></td>
1383 <td><tt>( '', '' ) </tt></td>
1384 <td><tt>( 'Main', 'WebHome' ) </tt></td>
1387 <td><tt>( '', 'Web/Topic' ) </tt></td>
1388 <td><tt>( 'Web', 'Topic' ) </tt></td>
1391 <td><tt>( '', 'Web/Subweb/Topic' ) </tt></td>
1392 <td><tt>( 'Web/Subweb', 'Topic' ) </tt></td>
1395 <td><tt>( '', 'Web.Topic' ) </tt></td>
1396 <td><tt>( 'Web', 'Topic' ) </tt></td>
1399 <td><tt>( '', 'Web.Subweb.Topic' ) </tt></td>
1400 <td><tt>( 'Web/Subweb', 'Topic' ) </tt></td>
1403 <td><tt>( 'Web1', 'Web2.Topic' )</tt></td>
1404 <td><tt>( 'Web2', 'Topic' ) </tt></td>
1408 Note that hierarchical web names ([[SubWeb]]) are only available if hierarchical webs are enabled in `configure`.
1410 The symbols %USERSWEB%, %SYSTEMWEB%, %DOCWEB%, %MAINWEB% and %TWIKIWEB% can be used in the input to represent the web names set in $cfg\{UsersWebName\} and $cfg\{SystemWebName\}. For example:
1412 <table border="1" cellpadding="0" cellspacing="0">
1414 <th bgcolor="#99CCCC"><strong> Input </strong></th>
1415 <th bgcolor="#99CCCC"><strong> Return </strong></th>
1418 <td><tt>( '%USERSWEB%', 'Topic' )</tt></td>
1419 <td><tt>( 'Main', 'Topic' ) </tt></td>
1422 <td><tt>( '%SYSTEMWEB%', 'Topic' )</tt></td>
1423 <td><tt>( 'TWiki', 'Topic' ) </tt></td>
1426 <td><tt>( '', '%DOCWEB%.Topic' )</tt></td>
1427 <td><tt>( 'TWiki', 'Topic' ) </tt></td>
1431 ### <a name="writeWarning( $text )"></a> writeWarning( $text )
1433 Log Warning that may require admin intervention to data/warning.txt
1435 - `$text` - Text to write; timestamp gets added
1439 **Since:** TWiki::Plugins::VERSION 1.020 (16 Feb 2004)
1441 ### <a name="writeDebug( $text )"></a> writeDebug( $text )
1443 Log debug message to data/debug.txt
1445 - `$text` - Text to write; timestamp gets added
1449 **Since:** TWiki::Plugins::VERSION 1.020 (16 Feb 2004)
1451 ### <a name="formatTime( $time, $format, $tim"></a> formatTime( $time, $format, $timezone ) -> $text
1453 Format the time in seconds into the desired time string
1455 - `$time` - Time in epoc seconds
1456 - `$format` - Format type, optional. Default e.g. `'31 Dec 2002 - 19:30'`. Can be `'$iso'` (e.g. `'2002-12-31T19:30Z'`), `'$rcs'` (e.g. `'2001/12/31 23:59:59'`, `'$http'` for HTTP header format (e.g. `'Thu, 23 Jul 1998 07:21:56 GMT'`), or any string with tokens `'$seconds, $minutes, $hours, $day, $wday, $month, $mo, $year, $ye, $tz'` for seconds, minutes, hours, day of month, day of week, 3 letter month, 2 digit month, 4 digit year, 2 digit year, timezone string, respectively
1457 - `$timezone` - either not defined (uses the displaytime setting), 'gmtime', or 'servertime'
1459 Return: `$text` Formatted time string
1461 <table border="1" cellpadding="0" cellspacing="0">
1464 <td> if you used the removed formatGmTime, add a third parameter 'gmtime' </td>
1468 **Since:** TWiki::Plugins::VERSION 1.020 (26 Feb 2004)
1470 ### <a name="is_ValidWikiWord ( $text ) - $bo"></a> isValidWikiWord ( $text ) -> $boolean
1472 Check for a valid [[WikiWord]] or [[WikiName]]
1474 - `$text` - Word to test
1476 **Since:** TWiki::Plugins::VERSION 1.100 (Dec 2005)
1478 ### <a name="extractParameters($attr ) - %par"></a> extractParameters($attr ) -> %params
1480 Extract all parameters from a variable string and returns a hash of parameters
1482 - `$attr` - Attribute string
1484 Return: `%params` Hash containing all parameters. The nameless parameter is stored in key `_DEFAULT`
1486 **Since:** TWiki::Plugins::VERSION 1.025 (26 Aug 2004)
1489 - Variable: `%TEST{ 'nameless' name1="val1" name2="val2" }%`
1490 - First extract text between `{...}` to get: `'nameless' name1="val1" name2="val2"`
1491 - Then call this on the text: <br />
1492 - params = TWiki::Func::extractParameters( $text );=
1493 - The `%params` hash contains now: <br />`_DEFAULT => 'nameless'`<br />`name1 => "val1"`<br />`name2 => "val2"`
1495 ### <a name="extract_NameValuePair( $attr, $n"></a> extractNameValuePair( $attr, $name ) -> $value
1497 Extract a named or unnamed value from a variable parameter string - Note: | Function TWiki::Func::extractParameters is more efficient for extracting several parameters
1499 - `$attr` - Attribute string
1500 - `$name` - Name, optional
1502 Return: `$value` Extracted value
1504 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
1507 - Variable: `%TEST{ 'nameless' name1="val1" name2="val2" }%`
1508 - First extract text between `{...}` to get: `'nameless' name1="val1" name2="val2"`
1509 - Then call this on the text: <br />`my $noname = TWiki::Func::extractNameValuePair( $text );`<br />`my $val1 = TWiki::Func::extractNameValuePair( $text, "name1" );`<br />`my $val2 = TWiki::Func::extractNameValuePair( $text, "name2" );`
1511 ## <a name="Deprecated functions"></a> Deprecated functions
1513 From time-to-time, the TWiki developers will add new functions to the interface (either to [[TWikiFuncDotPm]], or new handlers). Sometimes these improvements mean that old functions have to be deprecated to keep the code manageable. When this happens, the deprecated functions will be supported in the interface for at least one more TWiki release, and probably longer, though this cannot be guaranteed.
1515 Updated plugins may still need to define deprecated handlers for compatibility with old TWiki versions. In this case, the plugin package that defines old handlers can suppress the warnings in %FAILEDPLUGINS%.
1517 This is done by defining a map from the handler name to the `TWiki::Plugins` version _in which the handler was first deprecated_. For example, if we need to define the `endRenderingHandler` for compatibility with `TWiki::Plugins` versions before 1.1, we would add this to the plugin:
1519 package TWiki::Plugins::SinkPlugin;
1520 use vars qw( %TWikiCompatibility );
1521 $TWikiCompatibility{endRenderingHandler} = 1.1;
1523 If the currently-running TWiki version is 1.1 _or later_, then the _handler will not be called_ and _the warning will not be issued_. TWiki with versions of `TWiki::Plugins` before 1.1 will still call the handler as required.
1525 The following functions are retained for compatibility only. You should stop using them as soon as possible.
1527 ### <a name="get_ScriptUrlPath( ) - $path"></a> getScriptUrlPath( ) -> $path
1531 **DEPRECATED** since 1.1 - use `getScriptUrl` instead.
1533 Return: `$path` URL path of TWiki scripts, e.g. `"/cgi-bin"`
1535 **WARNING:** you are strongly recommended **not** to use this function, as the \{ScriptUrlPaths\} URL rewriting rules will not apply to urls generated using it.
1537 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
1539 ### <a name="get_PublicWebList( ) - @webs"></a> getPublicWebList( ) -> @webs
1541 **DEPRECATED** since 1.1 - use `getListOfWebs` instead.
1543 Get list of all public webs, e.g. all webs that do not have the `NOSEARCHALL` flag set in the [[WebPreferences]]
1545 Return: `@webs` List of all public webs, e.g. `( 'Main', 'Know', 'TWiki' )`
1547 **Since:** TWiki::Plugins::VERSION 1.000 (07 Dec 2002)
1549 ### <a name="format_GmTime( $time, $format )"></a><a name="format_GmTime( $time, $format ) "></a> formatGmTime( $time, $format ) -> $text
1551 **DEPRECATED** since 1.1 - use `formatTime` instead.
1553 Format the time to GM time
1555 - `$time` - Time in epoc seconds
1556 - `$format` - Format type, optional. Default e.g. `'31 Dec 2002 - 19:30'`, can be `'iso'` (e.g. `'2002-12-31T19:30Z'`), `'rcs'` (e.g. `'2001/12/31 23:59:59'`, `'http'` for HTTP header format (e.g. `'Thu, 23 Jul 1998 07:21:56 GMT'`)
1558 Return: `$text` Formatted time string
1560 **Since:** TWiki::Plugins::VERSION 1.000 (7 Dec 2002)
1562 ### <a name="get_DataDir( ) - $dir"></a> getDataDir( ) -> $dir
1564 **DEPRECATED** since 1.1 - use the "Webs, Topics and Attachments" functions to manipulate topics instead
1566 Get data directory (topic file root)
1568 Return: `$dir` Data directory, e.g. `'/twiki/data'`
1570 This function violates store encapsulation and is therefore **deprecated**.
1572 **Since:** TWiki::Plugins::VERSION 1.000 (07 Dec 2002)
1574 ### <a name="get_PubDir( ) - $dir"></a> getPubDir( ) -> $dir
1576 **DEPRECATED** since 1.1 - use the "Webs, Topics and Attachments" functions to manipulateattachments instead
1578 Get pub directory (file attachment root). Attachments are in `$dir/Web/TopicName`
1580 Return: `$dir` Pub directory, e.g. `'/htdocs/twiki/pub'`
1582 This function violates store encapsulation and is therefore **deprecated**.
1584 Use `readAttachment` and `saveAttachment` instead.
1586 **Since:** TWiki::Plugins::VERSION 1.000 (07 Dec 2002)
1588 ### <a name="checkDependencies( $moduleName,"></a><a name="checkDependencies( $moduleName, "></a> checkDependencies( $moduleName, $dependenciesRef ) -> $error
1590 **DEPRECATED** since 1.1 - use TWiki:Plugins.BuildContrib and define DEPENDENCIES that can be statically evaluated at install time instead. It is a lot more efficient.
1592 **Since:** TWiki::Plugins::VERSION 1.025 (01 Aug 2004)