* @copyright 1997-2005 The PHP Group * @license http://www.gnu.org/copyleft/lesser.html LGPL * @version CVS: $Id: Current.php 2 2010-11-23 14:32:26Z oldperl $ * @link http://pear.php.net/package/File_Archive */ require_once "File/Archive/Predicate.php"; /** * Evaluates to true only once, and then always to false */ class File_Archive_Predicate_Current extends File_Archive_Predicate { var $value = true; /** * @see File_Archive_Predicate::isTrue() */ function isTrue(&$source) { $tmp = $this->value; $this->value = false; return $tmp; } } ?>