Hello Erich,
I will fill a bug report with those.
We are already patching SIS for RHES so it should not be a problem.
Thanks for your input ;-)
Ben
* Erich Focht <[EMAIL PROTECTED]> [04-11-19 08:37]:
> Hi,
>
> I'm trying to add support for TaoLinux to OSCAR4 (have that for
> 2.3.1, and sort of have that for 3.0). It is an RHEL3 compatible
> distribution (like whitebox) with the advantage of supporting ia32,
> ia64 and x86_64 (well, even s390), so it creates no costs when
> developing something potentially good for RHEL3 and is applicable for
> all architectures.
>
> The tiny patch is needed for getting TaoLinux recognized in
> oscar4. It modifies
> lib/OSCAR/Distro.pm
> and
> /usr/lib/perl5/site_perl/OSCAR/PackMan/RPM.pm
> /usr/lib/perl5/site_perl/OSCAR/DepMan/UpdateRPMs.pm
>
> I'm sorry that I don't provide a patch for packman/depman themselves,
> the change is so small that any developer with write access to the svn
> repository can do it with minimal effort manually. If this is
> acceptable.
>
> I guess further patches will be needed in systeminstaller, but I'm not
> there, yet.
>
> Regards,
> Erich
>
>
> --- /opt/oscar/lib/OSCAR/Distro.pm.orig 2004-11-18 18:03:51.000000000
> +0100
> +++ /opt/oscar/lib/OSCAR/Distro.pm 2004-11-18 18:33:23.000000000 +0100
> @@ -40,6 +40,7 @@
> 'mandrake-release' => 'mandrake',
> 'redhat-release' => 'redhat',
> 'redhat-release-as'=> 'rhas',
> + 'tao-release' => 'rhas',
> 'aaa_version' => 'suse',
> 'aaa_base' => 'suse',
> 'debian_version' => 'debian',
> @@ -67,6 +68,10 @@
> if($output =~ /^([\w\.]+)/) {
> $version = $1;
> $name = $DISTROFILES->{$file};
> + print STDERR "file: $file, version: $version\n";
> + if (($file eq "tao-release") && ($version =~ m/^1/)) {
> + $version = "3.0";
> + }
> last;
> }
> }
> @@ -97,6 +102,9 @@
> $version = `cat /etc/SuSE-release | tail -1 | cut -d '=' -f 2 |
> cut -b 2-`;
> chomp $version;
> }
> + if (($file eq "tao-release") && ($version =~ m/^1/)) {
> + $version = "3.0";
> + }
> last;
> }
> return (lc $name, lc $version);
> --- /usr/lib/perl5/site_perl/OSCAR/PackMan/RPM.pm.orig 2004-11-18
> 18:13:51.000000000 +0100
> +++ /usr/lib/perl5/site_perl/OSCAR/PackMan/RPM.pm 2004-11-18
> 18:14:09.000000000 +0100
> @@ -35,7 +35,7 @@
> sub usable {
>
> my @DISTROFILES = ( 'fedora-release', 'mandrake-release', 'redhat-release',
> - 'redhat-release-as', 'aaa_version', 'aaa_base' );
> + 'redhat-release-as', 'aaa_version', 'aaa_base', 'tao-release' );
>
> ref (shift) and croak ("usable is a class method");
> my $chroot = shift;
> --- /usr/lib/perl5/site_perl/OSCAR/DepMan/UpdateRPMs.pm.orig 2004-11-18
> 18:11:15.000000000 +0100
> +++ /usr/lib/perl5/site_perl/OSCAR/DepMan/UpdateRPMs.pm 2004-11-18
> 18:12:05.000000000 +0100
> @@ -68,7 +68,7 @@
> # are the root directory being passed to the PackMan constructor.
> sub usable {
> my @DISTROFILES = ( 'fedora-release', 'mandrake-release', 'redhat-release',
> - 'redhat-release-as', 'aaa_version', 'aaa_base' );
> + 'redhat-release-as', 'aaa_version', 'aaa_base', 'tao-release' );
>
> ref (shift) and croak ("usable is a class method");
> my $chroot = shift;
--
Benoit des Ligneris Ph. D.
President de Revolution Linux http://www.revolutionlinux.com/
OSCAR Chair http://oscar.openclustergroup.org/
Chef de projet EduLinux http://www.edulinux.org/
-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://productguide.itmanagersjournal.com/
_______________________________________________
Oscar-devel mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/oscar-devel
