cpet/openbsd-ports
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Remove obsolete ghc-specific quirks

Browse Source 
ghc 8.2.2 is such a distant past only CVS can remember it.

ok kili
This commit is contained in:
gnezdo 2021-03-07 19:30:40 +00:00
parent c68d711c25
commit 8b1cd8b564
2 changed files with 1 additions and 43 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
devel/quirks/files/Quirks.pm
View File

@ -1,7 +1,7 @@
#! /usr/bin/perl
# ex:ts=8 sw=4:
# $OpenBSD: Quirks.pm,v 1.1231 2021/03/05 12:56:27 ajacoutot Exp $
# $OpenBSD: Quirks.pm,v 1.1232 2021/03/07 19:30:40 gnezdo Exp $
#
# Copyright (c) 2009 Marc Espie <espie@openbsd.org>
#
@ -2345,15 +2345,6 @@ sub is_base_system
my $pkgname = $handle->pkgname;
my $stem = OpenBSD::PackageName::splitstem($pkgname);
if ($stem eq 'ghc') {
require OpenBSD::PkgSpec;
my $spec = OpenBSD::PkgSpec->new('ghc-<8.2.2p5');
if ($spec->match_ref([$pkgname])) {
require OpenBSD::Quirks::ghc;
OpenBSD::Quirks::ghc::unfuck($handle, $state);
}
}
my $test = $base_exceptions->{$stem};
if (defined $test) {
require File::Glob;

33
devel/quirks/files/Quirks/ghc.pm
View File

@ -1,33 +0,0 @@
package OpenBSD::PackingElement;
sub ghc_alter
{
}
package OpenBSD::PackingElement::Unexec;
sub ghc_alter
{
my ($self, $rchanged) = @_;
$$rchanged = 1;
bless $self, "OpenBSD::PackingElement::Comment";
}
package OpenBSD::Quirks::ghc;
sub unfuck
{
my ($handle, $state) = @_;
my $pkgname = $handle->pkgname;
my $plist = OpenBSD::PackingList->from_installation($pkgname);
my $changed = 0;
$plist->ghc_alter(\$changed);
if ($changed) {
OpenBSD::PackingElement::File->add($plist,
'lib/ghc/package.conf.d/Cabal-2.0.1.0.conf');
OpenBSD::PackingElement::File->add($plist,
'lib/ghc/package.conf.d/array-0.5.2.0.conf');
$plist->to_installation;
}
}
1;