cvs: pear /PEAR_Frontend_Web WebInstaller.php

From: Date: Wed, 12 Jun 2002 13:41:01 +0000
Subject: cvs: pear /PEAR_Frontend_Web WebInstaller.php
Groups: php.pear.cvs 
Request: Send a blank email to pear-cvs+get-4578@lists.php.net to get a copy of this message
dickmann Wed Jun 12 09:41:01 2002 EDT Modified files: /pear/PEAR_Frontend_Web WebInstaller.php Log: remove my .registry-hack and make stig happy :) Index: pear/PEAR_Frontend_Web/WebInstaller.php diff -u pear/PEAR_Frontend_Web/WebInstaller.php:1.13 pear/PEAR_Frontend_Web/WebInstaller.php:1.14 --- pear/PEAR_Frontend_Web/WebInstaller.php:1.13 Wed Jun 12 09:11:19 2002 +++ pear/PEAR_Frontend_Web/WebInstaller.php Wed Jun 12 09:41:01 2002 @@ -16,7 +16,7 @@ | Author: Christian Dickmann <dickmann@php.net> | +----------------------------------------------------------------------+ - $Id: WebInstaller.php,v 1.13 2002/06/12 13:11:19 dickmann Exp $ + $Id: WebInstaller.php,v 1.14 2002/06/12 13:41:01 dickmann Exp $ */ define('PEAR_Frontend_Web',1); @session_start(); @@ -67,25 +67,21 @@ $ok = $cmd->run('config-set', array(), array('test_dir', $dir.'test')); // Register packages - function installPackage($dir, $filename) { - $data = unserialize(implode('',file($dir.$filename))); - if (is_array($data['filelist'])) - foreach($data['filelist'] as $key => $value) { - if ($value['role'] == "php") - $data['filelist'][$key] = str_replace('{dir}',$dir, $data['filelist'][$key]); + $packages = array( + 'Archive_Tar', 'Console_Getopt', 'HTML_Template_IT', + 'Net_UserAgent_Detect', 'Pager', 'PEAR', + 'PEAR_Frontend_Web', 'XML_RPC'); + $reg = new PEAR_Registry($dir.'PEAR'); + foreach($packages as $pkg) { + $info = $reg->packageInfo($pkg); + foreach($info['filelist'] as $fileName => $fileInfo) { + if($fileInfo['role'] == "php") { + $info['filelist'][$fileName]['installed_as'] = + str_replace('{dir}',$dir, $fileInfo['installed_as']); + }; }; - $fp = fopen($dir.$filename, 'w'); - fwrite($fp, serialize($data)); - fclose($fp); + $reg->updatePackage($pkg, $info, false); }; - installPackage($dir,'PEAR/.registry/Archive_Tar.reg'); - installPackage($dir,'PEAR/.registry/Console_Getopt.reg'); - installPackage($dir,'PEAR/.registry/HTML_Template_IT.reg'); - installPackage($dir,'PEAR/.registry/Net_UserAgent_Detect.reg'); - installPackage($dir,'PEAR/.registry/Pager.reg'); - installPackage($dir,'PEAR/.registry/PEAR.reg'); - installPackage($dir,'PEAR/.registry/PEAR_Frontend_Web.reg'); - installPackage($dir,'PEAR/.registry/XML_RPC.reg'); }; // Handle some diffrent Commands

« previous php.pear.cvs (#4578) next »