diff options
| -rw-r--r-- | httemplate/elements/xmlhttp.html | 26 |
1 files changed, 12 insertions, 14 deletions
diff --git a/httemplate/elements/xmlhttp.html b/httemplate/elements/xmlhttp.html index 6efc395f7..3f4462b94 100644 --- a/httemplate/elements/xmlhttp.html +++ b/httemplate/elements/xmlhttp.html @@ -1,17 +1,3 @@ -% -% my ( %opt ) = @_; -% -% my $url = $opt{'url'}; -% my $method = exists($opt{'method'}) ? $opt{'method'} : 'GET'; -% #my @subs = @{ $opt{'subs'}; -% my $key = exists($opt{'key'}) ? $opt{'key'} : ''; -% -% $url .= ( ($url =~ /\?/) ? '&' : '?' ) -% if $method eq 'GET'; -% -% - - <SCRIPT TYPE="text/javascript"> function rs_init_object() { @@ -109,3 +95,15 @@ </SCRIPT> +<%init> +my ( %opt ) = @_; + +my $url = $opt{'url'}; +my $method = exists($opt{'method'}) ? $opt{'method'} : 'GET'; +#my @subs = @{ $opt{'subs'}; +my $key = exists($opt{'key'}) ? $opt{'key'} : ''; + +$url .= ( ($url =~ /\?/) ? '&' : '?' ) + if $method eq 'GET'; + +</%init> |