Name

unpack — unpacks mapped output into template

ATTRIBUTES

Attribute Pos. Req. Default Description
interpolate     1 interpolate input?
reparse     1 interpolate output?
hide     0 Hide the tag return value?

DESCRIPTION

BEHAVIOR

This tag appears to be affected by, or affects, the following:
Pragmas: no_image_rewrite

EXAMPLES

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

NOTES

AVAILABILITY

unpack is available in Interchange versions:

4.6.0-5.7.0 (git-head)

SOURCE

Interchange 5.7.0:

Source: code/SystemTag/unpack.coretag
Lines: 44


# Copyright 2002-2007 Interchange Development Group and others
# 
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.  See the LICENSE file for details.
# 
# $Id: unpack.coretag,v 1.4 2007-03-30 23:40:49 pajamian Exp $

UserTag unpack PosNumber     0
UserTag unpack addAttr
UserTag unpack hasEndTag
UserTag unpack Interpolate
UserTag unpack Version       $Revision: 1.4 $
UserTag unpack Routine       <<EOR
sub {
my ($opt, $template) = @_;
Vend::Interpolate::substitute_image(\$template);
if($Vend::MultiOutput) {
#::logDebug("We have mult-output");
  for my $space (keys %Vend::OutPtr) {
#::logDebug("Filtering $space");
    my $things = $Vend::OutPtr{$space} || [];
    for my $ptr (@$things) {
      my $subs = $Vend::OutFilter{$space} || [];
      for my $sub (@$subs) {
#::logDebug("Filtering ${$Vend::Output[$ptr]}");
        $sub->($Vend::Output[$ptr]);
#::logDebug("Now is    ${$Vend::Output[$ptr]}");
    }
  }
}
}
else {
for(@Vend::Output) {
  Vend::Interpolate::substitute_image($_);
}
}
undef $Vend::MultiOutput;
$::Pragma->{no_image_rewrite} = 1;
Vend::Page::templatize($template);
return;
}
EOR

AUTHORS

Interchange Development Group

SEE ALSO

output-to(7ic)

DocBook! Interchange!