PHPTAL-NP-0.7.0/libs/PHPTAL/Attribute/TAL/On_error.php

   1 <?php
   2 /* vim: set expandtab tabstop=4 shiftwidth=4: */
   3 //
   4 //  Copyright (c) 2003 Laurent Bedubourg
   5 //
   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.
  10 //
  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.
  15 //
  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
  19 //
  20 //  Authors: Laurent Bedubourg <laurent.bedubourg@free.fr>
  21 //
  22
  23 class PHPTAL_Attribute_TAL_On_Error extends PHPTAL_Attribute
  24 {
  25     function start(&$g, &$tag)
  26     {
  27         $g->doComment("OnError handling");
  28         $g->execute('$__ctx__->cleanError()');
  29         $g->doOBStart();
  30     }
  31
  32     function end(&$g, &$tag)
  33     {
  34         $exp = new PHPTAL_Expression($g, $tag, $this->expression);
  35         $g->doIf("\$__ctx__->errorRaised()");
  36         $g->doOBClean();
  37         $exp->setPolicy(_PHPTAL_ES_RECEIVER_IS_OUTPUT);
  38         $err = $exp->generate();
  39         if (PEAR::isError($err)) { return $err; }
  40         $g->doElse();
  41         $g->doOBPrint();
  42         $g->endBlock();
  43     }
  44 }
  45
  46 ?>