| version 1.20, 2003/02/01 01:01:51 |
version 1.21, 2003/02/01 01:08:35 |
|
|
| # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| # SUCH DAMAGE. |
# SUCH DAMAGE. |
| # |
# |
| # $FreeBSD: /home/ncvs/projects/cvsweb/cvsweb.cgi,v 1.140 2002/12/21 23:27:09 scop Exp $ |
# $FreeBSD: /home/ncvs/projects/cvsweb/cvsweb.cgi,v 1.141 2002/12/23 15:05:09 scop Exp $ |
| # $Id$ |
# $Id$ |
| # $Idaemons: /home/cvs/cvsweb/cvsweb.cgi,v 1.84 2001/10/07 20:50:10 knu Exp $ |
# $Idaemons: /home/cvs/cvsweb/cvsweb.cgi,v 1.84 2001/10/07 20:50:10 knu Exp $ |
| # |
# |
| # DONT'T delete lines between '$''Idaemons' and '$''Platon' -- patches from FreeBSD failed then |
# DONT'T delete lines between '$''Idaemons' and '$''Platon' -- patches from FreeBSD failed then |
| # $Platon: scripts/cgi/cvsweb/cvsweb.cgi,v 1.19 2003/02/01 00:23:10 rajo Exp $ |
# $Platon: scripts/cgi/cvsweb/cvsweb.cgi,v 1.20 2003/02/01 01:01:51 rajo Exp $ |
| # |
# |
| ### |
### |
| |
|
|
|
| |
|
| use vars qw ( |
use vars qw ( |
| $VERSION |
$VERSION |
| $uname $config $allow_version_select $verbose |
$config $allow_version_select $verbose |
| @CVSrepositories @CVSROOT %CVSROOT %CVSROOTdescr |
@CVSrepositories @CVSROOT %CVSROOT %CVSROOTdescr |
| %MIRRORS %DEFAULTVALUE %ICONS %MTYPES |
%MIRRORS %DEFAULTVALUE %ICONS %MTYPES |
| @DIFFTYPES %DIFFTYPES @LOGSORTKEYS %LOGSORTKEYS |
@DIFFTYPES %DIFFTYPES @LOGSORTKEYS %LOGSORTKEYS |
| Line 590 if ($input{tarball}) { |
|
| Line 590 if ($input{tarball}) { |
|
| @cvs_options, '-Qd', $cvsroot, 'export', '-r', $tag, '-d', |
@cvs_options, '-Qd', $cvsroot, 'export', '-r', $tag, '-d', |
| "$tmpexportdir/$basedir", $module)) |
"$tmpexportdir/$basedir", $module)) |
| { |
{ |
| @fatal = ('500 Internal Error', _('cvs co failure: %s: %s'), $!, $module); |
@fatal = ('500 Internal Error', _('cvs export failure: %s: %s'), $!, $module); |
| } else { |
} else { |
| $| = 1; # Essential to get the buffering right. |
$| = 1; # Essential to get the buffering right. |
| |
|