cvs: php4 /pear/PEAR/Command Registry.php
| From: | Stig Bakken | Date: | Tue, 21 May 2002 02:04:03 +0000 |
| Subject: | cvs: php4 /pear/PEAR/Command Registry.php | ||
| Groups: | php.pear.cvs | ||
| Request: | Send a blank email to pear-cvs+get-3995@lists.php.net to get a copy of this message | ||
ssb Mon May 20 22:04:03 2002 EDT
Modified files:
/php4/pear/PEAR/Command Registry.php
Log:
* list command no longer displays test and data files when listing
installed files
Index: php4/pear/PEAR/Command/Registry.php
diff -u php4/pear/PEAR/Command/Registry.php:1.13 php4/pear/PEAR/Command/Registry.php:1.14
--- php4/pear/PEAR/Command/Registry.php:1.13 Mon May 20 21:40:35 2002
+++ php4/pear/PEAR/Command/Registry.php Mon May 20 22:04:03 2002
@@ -17,7 +17,7 @@
// | |
// +----------------------------------------------------------------------+
//
-// $Id: Registry.php,v 1.13 2002/05/21 01:40:35 ssb Exp $
+// $Id: Registry.php,v 1.14 2002/05/21 02:04:03 ssb Exp $
require_once 'PEAR/Command/Common.php';
require_once 'PEAR/Registry.php';
@@ -98,8 +98,10 @@
if (PEAR::isError($info)) {
return $this->raiseError($info);
}
-
- $list =$info['filelist'];
+ if ($info === null) {
+ return $this->raiseError("`$params[0]' not installed");
+ }
+ $list = $info['filelist'];
$caption = 'Contents of ' . basename($params[0]);
$this->ui->startTable(array('caption' => $caption,
'border' => true));
@@ -113,7 +115,12 @@
}
switch ($att['role']) {
case 'test':
- $dest = '-- will not be installed --'; break;
+ case 'data':
+ if ($installed) {
+ break 2;
+ }
+ $dest = '-- will not be installed --';
+ break;
case 'doc':
$dest = $this->config->get('doc_dir') . DIRECTORY_SEPARATOR
.
$dest;