cvs: pear /Archive_Tar/Archive Tar.php

vblavet Sun Nov 20 09:02:04 2005 EDT Modified files: /pear/Archive_Tar/Archive Tar.php Log: - Change filemode (from pear-core/Archive/Tar.php v.1.21) http://cvs.php.net/diff.php/pear/Archive_Tar/Archive/Tar.php?r1=1.32&r2=1.33&ty=u Index: pear/Archive_Tar/Archive/Tar.php diff -u pear/Archive_Tar/Archive/Tar.php:1.32 pear/Archive_Tar/Archive/Tar.php:1.33 --- pear/Archive_Tar/Archive/Tar.php:1.32 Sat Nov 19 09:47:24 2005 +++ pear/Archive_Tar/Archive/Tar.php Sun Nov 20 09:02:01 2005 @@ -16,7 +16,7 @@ // | Author: Vincent Blavet <vincent@phpconcept.net> | // +----------------------------------------------------------------------+ // -// $Id: Tar.php,v 1.32 2005/11/19 14:47:24 vblavet Exp $ +// $Id: Tar.php,v 1.33 2005/11/20 14:02:01 vblavet Exp $ require_once 'PEAR.php'; @@ -27,7 +27,7 @@ * Creates a (compressed) Tar archive * * @author Vincent Blavet <vincent@phpconcept.net> -* @version $Revision: 1.32 $ +* @version $Revision: 1.33 $ * @package Archive */ class Archive_Tar extends PEAR @@ -1516,8 +1516,11 @@ // ----- Change the file mode, mtime @touch($v_header['filename'], $v_header['mtime']); - // To be completed - //chmod($v_header[filename], DecOct($v_header[mode])); + if ($v_header['mode'] & 0111) { + // make file executable, obey umask + $mode = fileperms($v_header['filename']) | (~umask() & 0111); + @chmod($v_header['filename'], $mode); + } } // ----- Check the file size