Add a little bit of useful functionality to rrd_resize.

Package-Manager: portage-2.1.1_pre3-r1

5 files changed, 297 insertions, 9 deletions

diff --git a/net-analyzer/rrdtool/ChangeLog b/net-analyzer/rrdtool/ChangeLog
index 0357960b9544..55c13ac9f363 100644
--- a/net-analyzer/rrdtool/ChangeLog
+++ b/net-analyzer/rrdtool/ChangeLog
@@ -1,6 +1,12 @@
 # ChangeLog for net-analyzer/rrdtool
 # Copyright 2002-2006 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/net-analyzer/rrdtool/ChangeLog,v 1.93 2006/07/18 02:45:23 vanquirius Exp $
+# $Header: /var/cvsroot/gentoo-x86/net-analyzer/rrdtool/ChangeLog,v 1.94 2006/07/21 10:39:57 robbat2 Exp $
+
+*rrdtool-1.2.15-r1 (21 Jul 2006)
+
+  21 Jul 2006; Robin H. Johnson <robbat2@gentoo.org>
+  +files/rrdtool-1.2.15-newstyle-resize.patch, +rrdtool-1.2.15-r1.ebuild:
+  Add a little bit of useful functionality to rrd_resize.
 
 *rrdtool-1.2.15 (18 Jul 2006)
 
diff --git a/net-analyzer/rrdtool/Manifest b/net-analyzer/rrdtool/Manifest
index 9ddf2e2465e1..591385f2b502 100644
--- a/net-analyzer/rrdtool/Manifest
+++ b/net-analyzer/rrdtool/Manifest
@@ -1,7 +1,11 @@
-DIST rrdtool-1.0.49.tar.gz 1466897 RMD160 965cf352b4d3da64fdf44e0af5d1cf95072a283e SHA256 20acb0aa347f1629c4d5529ab8afbe4986fe820555049af3f905653300e5ea74
-DIST rrdtool-1.0.50.tar.gz 1474200 RMD160 96af2ec2831881e167687f65f5fc9bc64c67358b SHA256 42aa7c213dedbd95d33ca84d92f4187880f7e96062c6a3fb05bfb16f77ba2a91
-DIST rrdtool-1.2.11.tar.gz 1003339 RMD160 f294c3dd0e8597d0be23e2aa317774bd626695a6 SHA256 de1af03b28c1c7db3486f629710e53b6317d55810253d5d15f3add582ef30c69
-DIST rrdtool-1.2.13.tar.gz 1034025 RMD160 111b9cccea5e5a54ce1a206828f100bfb2cb3470 SHA256 9a0471609426a3fe7585ae04177a51ce1d136a77bb65535574bf795a961eee5b
+AUX rrdtool-1.2.15-newstyle-resize.patch 5231 RMD160 acdd68b7a7f422c615cfac824516beaeb782eb5e SHA1 973b40a3954942dd3306d5781f31faf4f88c257d SHA256 e55f1e7f0c4d3649b6790cb56247eaf5518a359ef662a959848805e416239fd1
+MD5 7fcb8fda7c3d799249423d8e69e0febe files/rrdtool-1.2.15-newstyle-resize.patch 5231
+RMD160 acdd68b7a7f422c615cfac824516beaeb782eb5e files/rrdtool-1.2.15-newstyle-resize.patch 5231
+SHA256 e55f1e7f0c4d3649b6790cb56247eaf5518a359ef662a959848805e416239fd1 files/rrdtool-1.2.15-newstyle-resize.patch 5231
+DIST rrdtool-1.0.49.tar.gz 1466897 RMD160 965cf352b4d3da64fdf44e0af5d1cf95072a283e SHA1 259a8445e429f0f04b59b0a959d965cd5a17eafb SHA256 20acb0aa347f1629c4d5529ab8afbe4986fe820555049af3f905653300e5ea74
+DIST rrdtool-1.0.50.tar.gz 1474200 RMD160 96af2ec2831881e167687f65f5fc9bc64c67358b SHA1 399e2bf807e3fbc987eec4c5364dc4cb416ba287 SHA256 42aa7c213dedbd95d33ca84d92f4187880f7e96062c6a3fb05bfb16f77ba2a91
+DIST rrdtool-1.2.11.tar.gz 1003339 RMD160 f294c3dd0e8597d0be23e2aa317774bd626695a6 SHA1 2aa33cbc857318679db03c0b8b42dc1ab18e4d4f SHA256 de1af03b28c1c7db3486f629710e53b6317d55810253d5d15f3add582ef30c69
+DIST rrdtool-1.2.13.tar.gz 1034025 RMD160 111b9cccea5e5a54ce1a206828f100bfb2cb3470 SHA1 5e097253d0792a2c95cc0aba0ac22855719796fa SHA256 9a0471609426a3fe7585ae04177a51ce1d136a77bb65535574bf795a961eee5b
 DIST rrdtool-1.2.15.tar.gz 1043064 RMD160 493e5b108ac363484eb4015c0962945c5fb9fb9e SHA1 4ac695aff26ab193a083c65513aad06ff36bad82 SHA256 b33d68da8a39bb0fc745c0202f3a58e73bfc6a9fd35d71fbd8979d40a5ef7397
 DIST rrdtool-1.2.6.tar.gz 872221 RMD160 f58831b31c57ea45a1086dd0daa01756ecaf4658 SHA256 abce65fcea0c6a47ba0325a79c2660f72d9a155b825da0a5001f7cdfddd59d0d
 EBUILD rrdtool-1.0.49.ebuild 2729 RMD160 e71d05afa5903dce2e9530fc0947b74d0d8a0c9f SHA1 e7bc24d16e3d9b71b5c3b53d9dc0fb24bce83d00 SHA256 16b548d812019fb399017dab4172e0c9490f97f30b3c374d77ce49a714d6431e
@@ -20,6 +24,10 @@ EBUILD rrdtool-1.2.13.ebuild 3068 RMD160 7c9b539207185edf8c0276914d15b717ddefbfe
 MD5 b5d558f91ec8e9b614ef5f84305f751d rrdtool-1.2.13.ebuild 3068
 RMD160 7c9b539207185edf8c0276914d15b717ddefbfe7 rrdtool-1.2.13.ebuild 3068
 SHA256 37cfcc66b674f6521a8e1def9f567a027d6cfb85f87d59b7a298ae6c54026580 rrdtool-1.2.13.ebuild 3068
+EBUILD rrdtool-1.2.15-r1.ebuild 3120 RMD160 cba9d2a33be5bf1177f2e405cc3b78b446a1af1d SHA1 ab2abaa0de50ef9c4ae03ba4a8cd457b2f90eb48 SHA256 254bf4d66b364ac6cc8615e6d0a96c3e2a817016aebcd8e450dad3ff705f1b79
+MD5 866a4b3a5ee389812eb3bacc442fc9b7 rrdtool-1.2.15-r1.ebuild 3120
+RMD160 cba9d2a33be5bf1177f2e405cc3b78b446a1af1d rrdtool-1.2.15-r1.ebuild 3120
+SHA256 254bf4d66b364ac6cc8615e6d0a96c3e2a817016aebcd8e450dad3ff705f1b79 rrdtool-1.2.15-r1.ebuild 3120
 EBUILD rrdtool-1.2.15.ebuild 3073 RMD160 fb8b8438ee9d1b29b869d8a962c0fa73dc287602 SHA1 8c957641e4ace8675fe139666a3d811543bb61d2 SHA256 52c4c14030102175e833cbba43399b190c7a301fe4da08fa5e9c405fa1de6734
 MD5 1f02e02f1b94f04a4d03e4a16fe92519 rrdtool-1.2.15.ebuild 3073
 RMD160 fb8b8438ee9d1b29b869d8a962c0fa73dc287602 rrdtool-1.2.15.ebuild 3073
@@ -28,10 +36,10 @@ EBUILD rrdtool-1.2.6-r1.ebuild 2792 RMD160 7ee995600c048dbfaac1d4c01975f4e48fe88
 MD5 916a2ac749bc18f0d3515931bcc3c592 rrdtool-1.2.6-r1.ebuild 2792
 RMD160 7ee995600c048dbfaac1d4c01975f4e48fe887a8 rrdtool-1.2.6-r1.ebuild 2792
 SHA256 b8aca50b5ae263aa008578f220ac2d4c82012005d22f8917f9ca54bba0825e30 rrdtool-1.2.6-r1.ebuild 2792
-MISC ChangeLog 14409 RMD160 3d891ede5b84b202a105c579664b575533f8f30a SHA1 42c6a1cd2068f80ab3ccc49b8a84f33d32c8f962 SHA256 912de8abbdfd8a8cd82bcc56c8e9ea0f1a058adab9ad60e667df6402be5d39b9
-MD5 7cfaa8dfc86a283642c67c894ee27f49 ChangeLog 14409
-RMD160 3d891ede5b84b202a105c579664b575533f8f30a ChangeLog 14409
-SHA256 912de8abbdfd8a8cd82bcc56c8e9ea0f1a058adab9ad60e667df6402be5d39b9 ChangeLog 14409
+MISC ChangeLog 14626 RMD160 dcab5f6957b3300600fa3a2a58c5c86b65b4df7b SHA1 c25c79bf4d0c5502ea2d56a0c3afdbcc68e783c0 SHA256 4410552aa7530919f160a30d7faf18c714b6a8cd05647d057179f2ea852b20a4
+MD5 01d7565ad3a9277b299bc8086307c218 ChangeLog 14626
+RMD160 dcab5f6957b3300600fa3a2a58c5c86b65b4df7b ChangeLog 14626
+SHA256 4410552aa7530919f160a30d7faf18c714b6a8cd05647d057179f2ea852b20a4 ChangeLog 14626
 MISC metadata.xml 241 RMD160 b010229ed860b6dadc3faa19006512f195e3ee55 SHA1 01721f8bf6f699f3647589a173ef1941fbd6dd1c SHA256 de63c7fc765937d32e93bda47d365a2e044ad3c6a70caff4ff5916dde97e6a3c
 MD5 1a739170238a1fae241a8a0df21462e9 metadata.xml 241
 RMD160 b010229ed860b6dadc3faa19006512f195e3ee55 metadata.xml 241
@@ -51,6 +59,9 @@ SHA256 43e1d1bc855d9e764f8fc28b05af48e6f5648a3154ef94fe086b8bf527d6e4ea files/di
 MD5 d04040e7f409bdc7d2ab4fce17702cdf files/digest-rrdtool-1.2.15 247
 RMD160 772add36b866e1107c42ba47f6b9f6e938a758c4 files/digest-rrdtool-1.2.15 247
 SHA256 62ab296ac4fc6e30708d669ec3df2e44b159d3b5075b047d2f551d4e1dea6f5b files/digest-rrdtool-1.2.15 247
+MD5 d04040e7f409bdc7d2ab4fce17702cdf files/digest-rrdtool-1.2.15-r1 247
+RMD160 772add36b866e1107c42ba47f6b9f6e938a758c4 files/digest-rrdtool-1.2.15-r1 247
+SHA256 62ab296ac4fc6e30708d669ec3df2e44b159d3b5075b047d2f551d4e1dea6f5b files/digest-rrdtool-1.2.15-r1 247
 MD5 105ab00f490ce2f0372afde45ccd2549 files/digest-rrdtool-1.2.6-r1 241
 RMD160 3425de5ce68bc51b0c1c301cc75956def35af3f2 files/digest-rrdtool-1.2.6-r1 241
 SHA256 b1a53151e3b90098c6124eac6da2dcd5ebff47f1f378709f3c5af62174565743 files/digest-rrdtool-1.2.6-r1 241
diff --git a/net-analyzer/rrdtool/files/digest-rrdtool-1.2.15-r1 b/net-analyzer/rrdtool/files/digest-rrdtool-1.2.15-r1
new file mode 100644
index 000000000000..4a38035815c3
--- /dev/null
+++ b/net-analyzer/rrdtool/files/digest-rrdtool-1.2.15-r1
@@ -0,0 +1,3 @@
+MD5 bde8b12c202bc4e27fb9a9588a0aaddf rrdtool-1.2.15.tar.gz 1043064
+RMD160 493e5b108ac363484eb4015c0962945c5fb9fb9e rrdtool-1.2.15.tar.gz 1043064
+SHA256 b33d68da8a39bb0fc745c0202f3a58e73bfc6a9fd35d71fbd8979d40a5ef7397 rrdtool-1.2.15.tar.gz 1043064
diff --git a/net-analyzer/rrdtool/files/rrdtool-1.2.15-newstyle-resize.patch b/net-analyzer/rrdtool/files/rrdtool-1.2.15-newstyle-resize.patch
new file mode 100644
index 000000000000..52b8c005a07e
--- /dev/null
+++ b/net-analyzer/rrdtool/files/rrdtool-1.2.15-newstyle-resize.patch
@@ -0,0 +1,142 @@
+Add support for a more useful resize method, that allows setting of the number
+of rows, instead of requiring manual calculation.
+
+Signed-off-by: Robin H. Johnson <robbat2@gentoo.org>
+
+diff -Nuar --exclude '*~' --exclude '*.txt' --exclude '*.html' --exclude '*.1' --exclude autom4te.cache --exclude bindings /dev/shm/portage/rrdtool-1.2.15/work/rrdtool-1.2.15/doc/rrdresize.pod /dev/shm/portage/rrdtool-1.2.15-r1/work/rrdtool-1.2.15/doc/rrdresize.pod
+--- rrdtool-1.2.15.orig/doc/rrdresize.pod	2006-07-14 05:11:26.000000000 -0700
++++ rrdtool-1.2.15/doc/rrdresize.pod	2006-07-21 01:56:56.333392940 -0700
+@@ -6,6 +6,8 @@
+ 
+ B<rrdtool> B<resize> I<filename> I<rra-num>  B<GROW>I<|>B<SHRINK> I<rows>
+ 
++B<rrdtool> B<resize> I<filename> I<rra-num>  [B<+>B<->B<=>]I<rows>
++
+ =head1 DESCRIPTION
+ 
+ The B<resize> function is used to modify the number of rows in
+@@ -23,17 +25,20 @@
+ 
+ =item B<GROW>
+ 
+-used if you want to add extra rows to an RRA. The extra rows will be inserted
+-as the rows that are oldest.
++(old style) used if you want to add extra rows to an RRA. The extra rows will
++be inserted as the rows that are oldest.
+ 
+ =item B<SHRINK>
+ 
+-used if you want to remove rows from an RRA. The rows that will be removed
+-are the oldest rows.
++(old style) used if you want to remove rows from an RRA. The rows that will be
++removed are the oldest rows.
+ 
+-=item I<rows>
++=item [B<+>B<->B<=>]I<rows>
+ 
+-the number of rows you want to add or remove.
++the number of rows you want to add or remove. when prefixed with any of B<+>,
++B<-> or B<=>, the B<GROW>I<|>B<SHRINK> argument is not required, and instead
++the prefix specifies to add (B<+>) I<rows>, remove (B<->) I<rows>, or set to
++exactly (B<=>) I<rows>.
+ 
+ =back
+ 
+diff -Nuar --exclude '*~' --exclude '*.txt' --exclude '*.html' --exclude '*.1' --exclude autom4te.cache --exclude bindings /dev/shm/portage/rrdtool-1.2.15/work/rrdtool-1.2.15/src/rrd_resize.c /dev/shm/portage/rrdtool-1.2.15-r1/work/rrdtool-1.2.15/src/rrd_resize.c
+--- rrdtool-1.2.15.orig/src/rrd_resize.c	2006-07-14 05:11:26.000000000 -0700
++++ rrdtool-1.2.15/src/rrd_resize.c	2006-07-21 03:09:45.656705610 -0700
+@@ -19,7 +19,7 @@
+     unsigned long	l,rra;
+     long		modify;
+     unsigned long	target_rra;
+-    int			grow=0,shrink=0;
++    int			grow=0,shrink=0,setsize=0,newstyle=0;
+     char		*endptr;
+ 
+     infilename=argv[1];
+@@ -27,7 +27,7 @@
+         rrd_set_error("resize.rrd is a reserved name");
+         return(-1);
+     }
+-    if (argc!=5) {
++    if (argc!=5 && argc != 4) {
+         rrd_set_error("wrong number of parameters");
+         return(-1);
+     }
+@@ -36,20 +36,39 @@
+ 
+     if (!strcmp(argv[3],"GROW")) grow=1;
+     else if (!strcmp(argv[3],"SHRINK")) shrink=1;
++	else if (argv[3][0] == '=' || argv[3][0] == '-' || argv[3][0] == '+') newstyle=3;
+     else {
+         rrd_set_error("I can only GROW or SHRINK");
+         return(-1);
+     }
+ 
+-    modify=strtol(argv[4],&endptr,0);
+-
+-    if ((modify<1)) {
+-        rrd_set_error("Please grow or shrink with at least 1 row");
+-        return(-1);
+-    }
+-
+-    if (shrink) modify = -modify;
++	// if the size starts with a character (=-+) then it's the new style
++	// instead. This is an extra mode so we can allow
++	// rrdtool resize FOO.rrd 5 GROW =5
++	if(argc == 5 && (argv[4][0] == '=' || argv[4][0] == '-' || argv[4][0] == '+')) {
++		newstyle = 4;
++	}
++	if(newstyle > 0) {
++		setsize = argv[newstyle][0] == '=' ? 1 : 0;
++		/* If we see a + or a -, then the codepath is simple */
++		grow = argv[newstyle][0] == '+' ? 1 : 0;
++		shrink = argv[newstyle][0] == '-' ? 1 : 0;
++		modify=strtol(argv[newstyle]+1,&endptr,0);
++		if(modify == 0) {
++			rrd_set_error("Refusing to add/delete/set with 0 rows");
++			return(-1);
++		}
++	} else {
++		/* this is the old code branch */
++		modify=strtol(argv[4],&endptr,0);
++
++		if ((modify<1)) {
++			rrd_set_error("Please grow or shrink with at least 1 row");
++			return(-1);
++		}
+ 
++		if (shrink) modify = -modify;
++	}
+ 
+     if (rrd_open(infilename, &infile, &rrdold, RRD_READWRITE)==-1) {
+         rrd_set_error("could not open RRD");
+@@ -68,6 +87,17 @@
+         fclose(infile);
+         return(-1);
+     }
++	/* if we are in setsize mode, we need to work out what modify factor to use */
++	if(setsize > 0) {
++		long oldsize = rrdold.rra_def[target_rra].row_cnt;
++		long newsize = modify;
++		// old=5, new=5 => modify = 0
++		if(newsize == oldsize) {
++			rrd_set_error("RRA is already set to that size!");
++			return(-1);
++		}
++		modify = newsize-oldsize;
++	}
+ 
+     if (modify < 0)
+ 	if ((long)rrdold.rra_def[target_rra].row_cnt <= -modify) {
+diff -Nuar --exclude '*~' --exclude '*.txt' --exclude '*.html' --exclude '*.1' --exclude autom4te.cache --exclude bindings /dev/shm/portage/rrdtool-1.2.15/work/rrdtool-1.2.15/src/rrd_tool.c /dev/shm/portage/rrdtool-1.2.15-r1/work/rrdtool-1.2.15/src/rrd_tool.c
+--- rrdtool-1.2.15.orig/src/rrd_tool.c	2006-07-14 05:11:26.000000000 -0700
++++ rrdtool-1.2.15/src/rrd_tool.c	2006-07-21 03:07:41.862541464 -0700
+@@ -152,6 +152,7 @@
+ 
+     char help_resize[] =
+ 	   " * resize - alter the length of one of the RRAs in an RRD\n\n"
++	   "\trrdtool resize filename rranum <+|-|=>rows\n";
+ 	   "\trrdtool resize filename rranum GROW|SHRINK rows\n\n";
+ 
+     char help_xport[] =
diff --git a/net-analyzer/rrdtool/rrdtool-1.2.15-r1.ebuild b/net-analyzer/rrdtool/rrdtool-1.2.15-r1.ebuild
new file mode 100644
index 000000000000..f133c6b4617d
--- /dev/null
+++ b/net-analyzer/rrdtool/rrdtool-1.2.15-r1.ebuild
@@ -0,0 +1,126 @@
+# Copyright 1999-2006 Gentoo Foundation
+# Distributed under the terms of the GNU General Public License v2
+# $Header: /var/cvsroot/gentoo-x86/net-analyzer/rrdtool/rrdtool-1.2.15-r1.ebuild,v 1.1 2006/07/21 10:39:57 robbat2 Exp $
+
+inherit perl-module flag-o-matic gnuconfig eutils multilib autotools
+
+DESCRIPTION="A system to store and display time-series data"
+HOMEPAGE="http://people.ee.ethz.ch/~oetiker/webtools/rrdtool/"
+SRC_URI="http://people.ee.ethz.ch/~oetiker/webtools/${PN}/pub/${P}.tar.gz"
+
+LICENSE="GPL-2"
+SLOT="0"
+KEYWORDS="~alpha ~amd64 ~hppa ~ia64 ~mips ~ppc ~ppc64 ~sparc ~x86"
+IUSE="doc perl python rrdcgi tcltk"
+
+RDEPEND="tcltk? ( dev-lang/tcl )
+	>=sys-libs/zlib-1.2.1
+	>=media-libs/freetype-2.1.5
+	>=media-libs/libart_lgpl-2.3.16
+	>=media-libs/libpng-1.2.5
+	rrdcgi? ( >=dev-libs/cgilib-0.5 )"
+
+DEPEND="${RDEPEND}
+	perl? ( dev-lang/perl )
+	python? ( dev-lang/python )
+	sys-apps/gawk"
+
+TCLVER=""
+
+src_unpack() {
+	unpack ${A}
+	cd "${S}"
+	sed -i -e 's:<rrd_\(.*\)>:"../../src/rrd_\1":g' \
+		bindings/tcl/tclrrd.c || die "sed failed"
+	sed -i -e 's:-lrrd_private:-ltcl -lrrd:' \
+		bindings/tcl/Makefile.* || die "sed failed"
+	sed -i -e 's:python_PROGRAMS:pyexec_PROGRAMS:' \
+		bindings/python/Makefile.* || die "sed failed"
+	sed -i -e 's:\$TCL_PACKAGE_PATH:${TCL_PACKAGE_PATH%% *}:' \
+		configure.ac
+	epatch ${FILESDIR}/${P}-newstyle-resize.patch
+	eautoreconf
+}
+
+pkg_setup() {
+	use perl && perl-module_pkg_setup
+}
+
+src_compile() {
+	filter-mfpmath sse
+	filter-flags -ffast-math
+
+	local myconf
+	myconf="--datadir=/usr/share --enable-shared"
+
+	use tcltk \
+		&& myconf="${myconf} --with-tcllib=/usr/$(get_libdir)" \
+		|| myconf="${myconf} --without-tcllib"
+
+	use python || myconf="${myconf} --disable-python"
+
+	if use perl ; then
+		econf ${myconf} \
+			$(use_enable rrdcgi) \
+			--with-perl-options='PREFIX=/usr INSTALLDIRS=vendor DESTDIR=${D}' || \
+			die "econf failed"
+	else
+		econf ${myconf} \
+			$(use_enable rrdcgi) \
+			--disable-perl || die "econf failed"
+	fi
+
+	make || die "make failed"
+}
+
+src_install() {
+	make DESTDIR="${D}" install || die "make install failed"
+
+	rm -fr "${D}"/usr/examples
+	rm -fr "${D}"/usr/shared
+
+	if use doc ; then
+		dohtml doc/*.html
+		dodoc doc/*.pod
+		dodoc doc/*.txt
+		insinto /usr/share/doc/${PF}/examples
+		doins examples/*
+		insinto /usr/share/doc/${PF}/contrib
+		doins contrib/*
+	fi
+
+	if use perl ; then
+		perlinfo
+		mytargets="site-perl-install"
+		perl-module_src_install || die
+
+		# remove duplicate installation into /usr/lib/perl
+		rm -Rf "${D}"/usr/lib/perl
+	fi
+
+	if use tcltk ; then
+		mv "${S}"/bindings/tcl/tclrrd.so "${S}"/bindings/tcl/tclrrd${PV}.so
+		insinto /usr/$(get_libdir)/tcl${TCL_VER}/tclrrd${PV}
+		doins "${S}"/bindings/tcl/tclrrd${PV}.so
+		echo "package ifneeded Rrd ${PV} [list load [file join \$$dir .. tclrrd${PV}.so]]" \
+			>> "${D}"/usr/$(get_libdir)/tcl${TCL_VER}/tclrrd${PV}/pkgIndex.tcl
+	fi
+
+	dodoc CONTRIBUTORS README TODO
+}
+
+pkg_preinst() {
+	use perl && perl-module_pkg_preinst
+}
+
+pkg_postinst() {
+	use perl && perl-module_pkg_postinst
+}
+
+pkg_prerm() {
+	use perl && perl-module_pkg_prerm
+}
+
+pkg_postrm() {
+	use perl && perl-module_pkg_postrm
+}