|
Lines 675-688
sub generatePackageInfo
Link Here
|
| 675 |
$module_section = $module_author; |
675 |
$module_section = $module_author; |
| 676 |
my @module_bits = split /\//, $module_author, 2; |
676 |
my @module_bits = split /\//, $module_author, 2; |
| 677 |
$module_author = $module_bits[0]; |
677 |
$module_author = $module_bits[0]; |
| 678 |
$module_section = sprintf "MODULE_SECTION=\"%s\"\n", $module_bits[1]; |
678 |
$module_section = sprintf "DIST_SECTION=\"%s\"\n", $module_bits[1]; |
| 679 |
} |
679 |
} |
| 680 |
|
680 |
|
| 681 |
# Detect the file extension, upstream usually uses .tar.gz, but not always |
681 |
# Detect the file extension, upstream usually uses .tar.gz, but not always |
| 682 |
my $module_a_ext = ''; |
682 |
my $module_a_ext = ''; |
| 683 |
foreach my $ext (qw( tgz tbz2 tar.bz2 tar.xz tar.Z zip )) { |
683 |
foreach my $ext (qw( tgz tbz2 tar.bz2 tar.xz tar.Z zip )) { |
| 684 |
if ( $gcpan_run->{'cpan'}{lc($original_ebuild)}{'src_uri'} =~ m/\.\Q$ext\E$/ ) { |
684 |
if ( $gcpan_run->{'cpan'}{lc($original_ebuild)}{'src_uri'} =~ m/\.\Q$ext\E$/ ) { |
| 685 |
$module_a_ext = sprintf 'MODULE_A_EXT="%s"', $ext; |
685 |
$module_a_ext = sprintf 'DIST_A_EXT="%s"', $ext; |
| 686 |
} |
686 |
} |
| 687 |
} |
687 |
} |
| 688 |
|
688 |
|
|
Lines 691-704
sub generatePackageInfo
Link Here
|
| 691 |
$description =~ s/"/\\"/g; |
691 |
$description =~ s/"/\\"/g; |
| 692 |
|
692 |
|
| 693 |
print $EBUILD <<"HERE"; |
693 |
print $EBUILD <<"HERE"; |
| 694 |
# Copyright 1999-2016 Gentoo Foundation |
694 |
# Copyright 1999-2022 Gentoo Foundation |
| 695 |
# Distributed under the terms of the GNU General Public License v2 |
695 |
# Distributed under the terms of the GNU General Public License v2 |
| 696 |
# This ebuild generated by $prog $VERSION |
696 |
# This ebuild generated by $prog $VERSION |
| 697 |
|
697 |
|
| 698 |
EAPI=5 |
698 |
EAPI=8 |
| 699 |
|
699 |
|
| 700 |
MODULE_AUTHOR="$module_author" |
700 |
DIST_AUTHOR="$module_author" |
| 701 |
MODULE_VERSION="$module_version" |
701 |
DIST_VERSION="$module_version" |
| 702 |
$module_a_ext |
702 |
$module_a_ext |
| 703 |
$module_section |
703 |
$module_section |
| 704 |
inherit perl-module |
704 |
inherit perl-module |
