control

ATTRIBUTES

Attribute	Pos.	Req.	Default	Description

DESCRIPTION

BEHAVIOR

This tag does not appear to be affected by, or affect, the rest of Interchange.

EXAMPLES

No examples are available at this time. We do consider this a problem and will try to supply some.

NOTES

AVAILABILITY

control_set is available in Interchange versions:

4.8.0

SOURCE

Interchange 4.8.0:

Source: lib/Vend/Interpolate.pm (rev. 2.9.2.29 from Fri Jan 24 06:51:52 2003)
Lines: 6244

sub tag_control_set {
my ($index, $opt, $body) = @_;

my $inc;
unless($index) {
  $index = $::Scratch->{control_index} || 0;
  $inc = 1;
}

while($body =~ m{\[([-\w]+)\](.*)\[/\1\]}sg) {
  my $name = lc $1;
  my $val = $2;
  $name =~ s/-/_/g;
  $::Control->[$index]{$name} = $val;
}
$::Scratch->{control_index}++;
return;
}

AUTHORS

Interchange Development Group

Name