commit:     6df6bdd91252371ab1ee97675d69bd54142cbbb9
Author:     Andreas K. Hüttel <dilfridge <AT> gentoo <DOT> org>
AuthorDate: Sat Mar 14 19:48:12 2026 +0000
Commit:     Andreas K. Hüttel <dilfridge <AT> gentoo <DOT> org>
CommitDate: Sat Mar 14 19:48:12 2026 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=6df6bdd9

dev-perl/CGI-FormBuilder: drop 3.100.0-r1

Signed-off-by: Andreas K. Hüttel <dilfridge <AT> gentoo.org>

 .../CGI-FormBuilder-3.100.0-r1.ebuild              |  71 ----------
 dev-perl/CGI-FormBuilder/Manifest                  |   1 -
 .../files/CGI-FormBuilder-3.90.0-rt81650.patch     | 155 ---------------------
 3 files changed, 227 deletions(-)

diff --git a/dev-perl/CGI-FormBuilder/CGI-FormBuilder-3.100.0-r1.ebuild 
b/dev-perl/CGI-FormBuilder/CGI-FormBuilder-3.100.0-r1.ebuild
deleted file mode 100644
index 7f971495027b..000000000000
--- a/dev-perl/CGI-FormBuilder/CGI-FormBuilder-3.100.0-r1.ebuild
+++ /dev/null
@@ -1,71 +0,0 @@
-# Copyright 1999-2022 Gentoo Authors
-# Distributed under the terms of the GNU General Public License v2
-
-EAPI=7
-
-DIST_AUTHOR=BIGPRESH
-DIST_VERSION=3.10
-inherit perl-module
-
-DESCRIPTION="Extremely fast, reliable form generation and processing module"
-HOMEPAGE="http://www.formbuilder.org/ 
https://metacpan.org/release/CGI-FormBuilder";
-# Explicit declaration by upstream
-LICENSE="|| ( Artistic GPL-1 )"
-SLOT="0"
-KEYWORDS="amd64 ~arm64 ~ppc64 ~riscv ~x86"
-IUSE="test"
-RESTRICT="!test? ( test )"
-
-PATCHES=(
-       "${FILESDIR}/${PN}-3.90.0-rt81650.patch"
-)
-# Templates that can be used - but they are optional
-#      >=dev-perl/CGI-SSI-0.920.0
-
-RDEPEND="dev-perl/CGI"
-BDEPEND="${RDEPEND}
-       virtual/perl-ExtUtils-MakeMaker
-"
-
-optdep_notice() {
-       local i;
-       elog "This package has support for optional features via the following 
packages"
-       elog "which you may want to install separately:"
-       elog
-       i="$(if has_version '>=dev-perl/CGI-Session-3.950.0'; then echo '[I]'; 
else echo '[ ]'; fi)"
-       elog " $i >=dev-perl/CGI-Session-3.950.0"
-       elog "     - Multi-page form persistence with CGI::FormBuilder::Multi";
-       elog
-       elog " Alternative Template Engines:"
-       i="$(if has_version '>=dev-perl/CGI-FastTemplate-1.90.0'; then echo 
'[I]'; else echo '[ ]'; fi)"
-       elog " $i >=dev-perl/CGI-FastTemplate-1.90.0"
-       elog "     - CGI::FastTemplate via CGI::FormBuilder::Template::Fast";
-
-       i="$(if has_version '>=dev-perl/HTML-Template-2.60.0'; then echo '[I]'; 
else echo '[ ]'; fi)"
-       elog " $i >=dev-perl/HTML-Template-2.60.0"
-       elog "     - HTML::Template    via CGI::FormBuilder::Template::HTML";
-
-       i="$(if has_version '>=dev-perl/Template-Toolkit-2.80.0'; then echo 
'[I]'; else echo '[ ]'; fi)"
-       elog " $i >=dev-perl/Template-Toolkit-2.80.0"
-       elog "     - Template.pm       via CGI::FormBuilder::Template::TT2";
-
-       i="$(if has_version '>=dev-perl/Text-Template-1.430.0'; then echo 
'[I]'; else echo '[ ]'; fi)"
-       elog " $i >=dev-perl/Text-Template-1.430.0"
-       elog "     - Text::Template    via CGI::FormBuilder::Template::Text";
-
-       if use test; then
-               elog
-               elog "This module will perform additonal tests if these 
dependencies are"
-               elog "pre-installed"
-       fi
-}
-
-src_test() {
-       optdep_notice;
-       echo
-       perl-module_src_test
-}
-
-pkg_postinst() {
-       use test || optdep_notice;
-}

diff --git a/dev-perl/CGI-FormBuilder/Manifest 
b/dev-perl/CGI-FormBuilder/Manifest
index 5dcc78d7460d..a0f587628ea5 100644
--- a/dev-perl/CGI-FormBuilder/Manifest
+++ b/dev-perl/CGI-FormBuilder/Manifest
@@ -1,2 +1 @@
-DIST CGI-FormBuilder-3.10.tar.gz 162346 BLAKE2B 
96850d80b10e1c96cefd4fa83316b470898388047cc34ce7dc8b6f29086e6622e743ec548370faecee8b88a4f5ee87e7ec4c98cb5df04cac5a4a8d63e45c5ae3
 SHA512 
38d8e6eb729e188074d872b979ad46133152877bb30b95329a2c7275154646a4afb62dc3539cb34781149f424b1d384d05230efe8b174967742625a81765bad5
 DIST CGI-FormBuilder-3.20.tar.gz 163211 BLAKE2B 
02528520716b750ed8601a1175821b528f9124d7b2c4f0a5a6b8328c5a85c40e9529954dd1b7f1644614535662f05374e3e2db2a6361efc7d96d1f33a387dfd5
 SHA512 
ecba725d77f36abfdc43074981f884ddcce7d3e72828fdfce08c30450cb6b445f8e04b48257ee576167e6556646256e7a75e873a4c422ae4c19890b17408c9ae

diff --git 
a/dev-perl/CGI-FormBuilder/files/CGI-FormBuilder-3.90.0-rt81650.patch 
b/dev-perl/CGI-FormBuilder/files/CGI-FormBuilder-3.90.0-rt81650.patch
deleted file mode 100644
index 08c4f98a5e16..000000000000
--- a/dev-perl/CGI-FormBuilder/files/CGI-FormBuilder-3.90.0-rt81650.patch
+++ /dev/null
@@ -1,155 +0,0 @@
-diff -Naur CGI-FormBuilder-3.09/t/1c-validate.t 
CGI-FormBuilder-3.09b/t/1c-validate.t
---- CGI-FormBuilder-3.09/t/1c-validate.t       2013-11-30 00:10:36.000000000 
+0000
-+++ CGI-FormBuilder-3.09b/t/1c-validate.t      2016-05-11 13:10:45.680369595 
+0000
-@@ -174,11 +174,11 @@
- for my $t (@test) {
- 
-     my $form = CGI::FormBuilder->new( %{ $t->{opt} }, debug => $DEBUG );
--    while(my($f,$o) = each %{$t->{mod} || {}}) {
--        $o->{name} = $f;
--        $form->field(%$o);
-+    for my $field ( sort keys %{ $t->{mod} || {} } ) {
-+        my $object = $t->{mod}->{$field};
-+        $object->{name} = $field;
-+        $form->field( %{ $object } );
-     }
--
-     # just try to validate
-     ok($form->validate, $t->{pass} || 0);
- }
-diff -Naur CGI-FormBuilder-3.09/t/1d-messages.t 
CGI-FormBuilder-3.09b/t/1d-messages.t
---- CGI-FormBuilder-3.09/t/1d-messages.t       2013-11-30 00:10:36.000000000 
+0000
-+++ CGI-FormBuilder-3.09b/t/1d-messages.t      2016-05-11 13:08:33.159540213 
+0000
-@@ -70,8 +70,9 @@
- my $locale = "fb_FAKE";
- my $messages = "messages.$locale";
- open(M, ">$messages") || warn "Can't write $messages: $!";
--while (my($k,$v) = each %messages) {
--    print M join(' ', $k, ref($v) ? @$v : $v), "\n";
-+for my $k ( sort keys %messages ) {
-+  my $v = $messages{$k};
-+  print M join(' ', $k, ref($v) ? @$v : $v), "\n";
- }
- close(M);
- 
-@@ -123,7 +124,7 @@
- # Final test set is to just make sure we have all the keys for all modules
- require CGI::FormBuilder::Messages::default;
- my %need = CGI::FormBuilder::Messages::default->messages;
--my @keys = keys %need;
-+my @keys = sort keys %need;
- for my $pm (@pm) {
-     my($lang) = $pm =~ /([a-z]+_[A-Z]+)/;
-     my $skip = $lang ? undef : "skip: Can't get language from $pm";
-diff -Naur CGI-FormBuilder-3.09/t/2a-template-html.t 
CGI-FormBuilder-3.09b/t/2a-template-html.t
---- CGI-FormBuilder-3.09/t/2a-template-html.t  2013-11-30 00:10:36.000000000 
+0000
-+++ CGI-FormBuilder-3.09b/t/2a-template-html.t 2016-05-11 13:11:57.438740284 
+0000
-@@ -102,18 +102,19 @@
- my $seq = $ARGV[0] || 1;
- 
- # Cycle thru and try it out
--for (@test) {
-+for my $test_item (@test) {
-     my $form = CGI::FormBuilder->new(
-                     debug => $DEBUG,
-                     action => 'TEST',
-                     title  => 'TEST',
--                    %{ $_->{opt} },
-+                    %{ $test_item->{opt} },
-                );
- 
-     # the ${mod} key twiddles fields
--    while(my($f,$o) = each %{$_->{mod} || {}}) {
--        $o->{name} = $f;
--        $form->field(%$o);
-+    for my $field ( sort keys %{ $test_item->{mod} || {} } ) {
-+        my $object = $test_item->{mod}->{$field};
-+        $object->{name} = $field;
-+        $form->field( %{ $object } );
-     }
- 
-     #
-diff -Naur CGI-FormBuilder-3.09/t/2b-template-text.t 
CGI-FormBuilder-3.09b/t/2b-template-text.t
---- CGI-FormBuilder-3.09/t/2b-template-text.t  2013-11-30 00:10:36.000000000 
+0000
-+++ CGI-FormBuilder-3.09b/t/2b-template-text.t 2016-05-11 13:11:29.861982062 
+0000
-@@ -97,18 +97,19 @@
- my $seq = $ARGV[0] || 1;
- 
- # Cycle thru and try it out
--for (@test) {
-+for my $test_item (@test) {
-     my $form = CGI::FormBuilder->new(
-                     debug => $DEBUG,
-                     action => 'TEST',
-                     title  => 'TEST',
--                    %{ $_->{opt} },
-+                    %{ $test_item->{opt} },
-                );
- 
-     # the ${mod} key twiddles fields
--    while(my($f,$o) = each %{$_->{mod} || {}}) {
--        $o->{name} = $f;
--        $form->field(%$o);
-+    for my $field ( sort keys %{ $test_item->{mod} || {} } ) {
-+        my $object = $test_item->{mod}->{$field};
-+        $object->{name} = $field;
-+        $form->field( %{ $object } );
-     }
- 
-     #
-diff -Naur CGI-FormBuilder-3.09/t/2d-template-fast.t 
CGI-FormBuilder-3.09b/t/2d-template-fast.t
---- CGI-FormBuilder-3.09/t/2d-template-fast.t  2013-11-30 00:10:36.000000000 
+0000
-+++ CGI-FormBuilder-3.09b/t/2d-template-fast.t 2016-05-11 13:15:58.497630259 
+0000
-@@ -135,18 +135,19 @@
- my $seq = $ARGV[0] || 1;
- 
- # Cycle thru and try it out
--for (@test) {
-+for my $test_item (@test) {
-     my $form = CGI::FormBuilder->new(
-                     debug => $DEBUG,
-                     action => 'TEST',
-                     title  => 'TEST',
--                    %{ $_->{opt} },
-+                    %{ $test_item->{opt} },
-                );
- 
-     # the ${mod} key twiddles fields
--    while(my($f,$o) = each %{$_->{mod} || {}}) {
--        $o->{name} = $f;
--        $form->field(%$o);
-+    for my $field ( sort keys %{ $test_item->{mod} || {} } ) {
-+        my $object = $test_item->{mod}->{$field};
-+        $object->{name} = $field;
-+        $form->field( %{ $object } );
-     }
- 
-     #
-diff -Naur CGI-FormBuilder-3.09/t/2e-template-ssi.t 
CGI-FormBuilder-3.09b/t/2e-template-ssi.t
---- CGI-FormBuilder-3.09/t/2e-template-ssi.t   2013-11-30 00:10:36.000000000 
+0000
-+++ CGI-FormBuilder-3.09b/t/2e-template-ssi.t  2016-05-11 13:12:37.526388964 
+0000
-@@ -102,18 +102,19 @@
- my $seq = $ARGV[0] || 1;
- 
- # Cycle thru and try it out
--for (@test) {
-+for my $test_item (@test) {
-     my $form = CGI::FormBuilder->new(
-                     debug => $DEBUG,
-                     action => 'TEST',
-                     title  => 'TEST',
--                    %{ $_->{opt} },
-+                    %{ $test_item->{opt} },
-                );
- 
-     # the ${mod} key twiddles fields
--    while(my($f,$o) = each %{$_->{mod} || {}}) {
--        $o->{name} = $f;
--        $form->field(%$o);
-+    for my $field ( sort keys %{ $test_item->{mod} || {} } ) {
-+        my $object = $test_item->{mod}->{$field};
-+        $object->{name} = $field;
-+        $form->field( %{ $object } );
-     }
- 
-     #

Reply via email to