don't want "-" in package names

This commit is contained in:
Tomas V.V.Cox 2001-09-27 23:31:15 +00:00
parent f512ec4331
commit 95d19651f3

View file

@ -135,7 +135,7 @@ class PEAR_Packager extends PEAR_Common
$pkgfile = basename($pkgfile); $pkgfile = basename($pkgfile);
$pkgver = $pkginfo['package'] . '-' . $pkginfo['version']; $pkgver = $pkginfo['package'] . '-' . $pkginfo['version'];
// don't want strange characters // don't want strange characters
$pkgver = ereg_replace ('[^a-zA-Z0-9._-]', '_', $pkgver); $pkgver = ereg_replace ('[^a-zA-Z0-9._]', '_', $pkgver);
$this->tmpdir = $pwd . DIRECTORY_SEPARATOR . $pkgver; $this->tmpdir = $pwd . DIRECTORY_SEPARATOR . $pkgver;
if (file_exists($this->tmpdir)) { if (file_exists($this->tmpdir)) {
return $this->raiseError('Tmpdir: ' . $this->tmpdir .' already exists', return $this->raiseError('Tmpdir: ' . $this->tmpdir .' already exists',