2 /* vim: set expandtab tabstop=4 shiftwidth=4: */
4 // Copyright (c) 2003 Laurent Bedubourg
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License, or (at your option) any later version.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // Authors: Laurent Bedubourg <laurent.bedubourg@free.fr>
23 class PHPTAL_Attribute_METAL_Use_Macro
extends PHPTAL_Attribute
25 function activate(&$g, &$tag)
28 $err = $tag->generateContent($g);
29 if (PEAR
::isError($err)) { return $err; }
32 $path = $g->newTemporaryVar();
34 $g->doAffectResult($path, "'". PHPTAL_ES_path_in_string($this->expression
,"'") . "'");
36 $temp = $g->newTemporaryVar();
39 $g->execute('$__old_error = $__ctx__->_errorRaised');
40 $g->execute('$__ctx__->_errorRaised = false');
42 $g->doAffectResult($temp, 'new PHPTAL_Macro($__tpl__, '. $path .')');
43 $g->doAffectResult($temp, $temp.'->execute($__tpl__)');
45 $g->doIf('PEAR::isError('.$temp.')');
46 $g->execute('$__ctx__->_errorRaised = '.$temp );
49 $g->doPrintVar($temp, true);
52 $g->doIf('!$__ctx__->_errorRaised');
53 $g->execute('$__ctx__->_errorRaised = $__old_error');