Add p5-Class-BlackHole 0.03,

base class to treat unhandled method
calls as no-ops.

PR:		32965
Submitted by:	Sergey Skvortsov <skv@FreeBSD.org>

6 files changed, 42 insertions, 0 deletions

diff --git a/devel/Makefile b/devel/Makefile
index 94b0a4f81ffe..144a84424985 100644
--- a/devel/Makefile
+++ b/devel/Makefile
@@ -364,6 +364,7 @@
     SUBDIR += p5-Carp-Assert
     SUBDIR += p5-Cdk
     SUBDIR += p5-Class-Accessor
+    SUBDIR += p5-Class-BlackHole
     SUBDIR += p5-Class-Contract
     SUBDIR += p5-Class-Data-Inheritable
     SUBDIR += p5-Class-Date
diff --git a/devel/p5-Class-BlackHole/Makefile b/devel/p5-Class-BlackHole/Makefile
new file mode 100644
index 000000000000..7cfb337e0a55
--- /dev/null
+++ b/devel/p5-Class-BlackHole/Makefile
@@ -0,0 +1,22 @@
+# New ports collection makefile for:	Class-BlackHole
+# Date created:		17 Dec 2001
+# Whom:			Sergey Skvortsov <skv@FreeBSD.org>
+#
+# $FreeBSD$
+#
+
+PORTNAME=	Class-BlackHole
+PORTVERSION=	0.03
+CATEGORIES=	devel perl5
+MASTER_SITES=	${MASTER_SITE_PERL_CPAN}
+MASTER_SITE_SUBDIR=	Class
+PKGNAMEPREFIX=	p5-
+
+MAINTAINER=	skv@FreeBSD.org
+
+PERL_CONFIGURE=	yes
+
+MANPREFIX=	${PREFIX}/lib/perl5/${PERL_VERSION}
+MAN3=		Class::BlackHole.3
+
+.include <bsd.port.mk>
diff --git a/devel/p5-Class-BlackHole/distinfo b/devel/p5-Class-BlackHole/distinfo
new file mode 100644
index 000000000000..590df13a901c
--- /dev/null
+++ b/devel/p5-Class-BlackHole/distinfo
@@ -0,0 +1 @@
+MD5 (Class-BlackHole-0.03.tar.gz) = 568ca5e8a9520d0ae2453c3ee9a49d5f
diff --git a/devel/p5-Class-BlackHole/pkg-comment b/devel/p5-Class-BlackHole/pkg-comment
new file mode 100644
index 000000000000..97dc6264f143
--- /dev/null
+++ b/devel/p5-Class-BlackHole/pkg-comment
@@ -0,0 +1 @@
+Base class to treat unhandled method calls as no-ops
diff --git a/devel/p5-Class-BlackHole/pkg-descr b/devel/p5-Class-BlackHole/pkg-descr
new file mode 100644
index 000000000000..7184c2e2a376
--- /dev/null
+++ b/devel/p5-Class-BlackHole/pkg-descr
@@ -0,0 +1,12 @@
+Normally, if you try to call a method that there's no handler for, you
+get an error:
+
+  Can't locate object method "flork" via package "X".
+
+But for classes that inherit from Class::BlackHole, unhandled methods
+become just no-operations.
+
+WWW: http://search.cpan.org/search?dist=Class-BlackHole
+
+-- Sergey Skvortsov
+skv@FreeBSD.org
diff --git a/devel/p5-Class-BlackHole/pkg-plist b/devel/p5-Class-BlackHole/pkg-plist
new file mode 100644
index 000000000000..1842d35c5914
--- /dev/null
+++ b/devel/p5-Class-BlackHole/pkg-plist
@@ -0,0 +1,5 @@
+lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/Class/BlackHole/.packlist
+lib/perl5/site_perl/%%PERL_VER%%/Class/BlackHole.pm
+@dirrm lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/Class/BlackHole
+@unexec rmdir %D/lib/perl5/site_perl/%%PERL_VER%%/Class 2>/dev/null || true
+@unexec rmdir %D/lib/perl5/site_perl/%%PERL_VER%%/%%PERL_ARCH%%/auto/Class 2>/dev/null || true