forked from Lainports/freebsd-ports
c099a45fe4
In addition to support for the standard itself, Crypt::OpenPGP claims compatibility with many other PGP implementations, both those that support the standard and those that preceded it.
35 lines
890 B
Text
35 lines
890 B
Text
--- Makefile.PL.orig Tue Sep 11 10:23:45 2001
|
|
+++ Makefile.PL Tue Sep 11 10:25:39 2001
|
|
@@ -49,9 +49,9 @@
|
|
MSG
|
|
my $i = 1;
|
|
for my $ciph (@cryptmod) {
|
|
- printf " [%d] %s\n", $i++, $ciph->[0];
|
|
+ #printf " [%d] %s\n", $i++, $ciph->[0];
|
|
}
|
|
-my $c = prompt("\nEnter your choices, separated by spaces:", 1);
|
|
+my $c = "1 2 5";
|
|
print "\n";
|
|
|
|
for my $id (split /\s+/, $c) {
|
|
@@ -70,9 +70,9 @@
|
|
MSG
|
|
my $i = 1;
|
|
for my $ciph (@dgstmod) {
|
|
- printf " [%d] %s\n", $i++, $ciph->[0];
|
|
+ #printf " [%d] %s\n", $i++, $ciph->[0];
|
|
}
|
|
-my $c = prompt("\nEnter your choices, separated by spaces:", 2);
|
|
+my $c = "1 2";
|
|
print "\n";
|
|
|
|
for my $id (split /\s+/, $c) {
|
|
@@ -98,7 +98,7 @@
|
|
for my $pk (@pkmod) {
|
|
printf " [%d] %s\n", $i++, $pk->[0];
|
|
}
|
|
-my $c = prompt("\nEnter your choices, separated by spaces:", '1 2');
|
|
+my $c = "1 2";
|
|
print "\n";
|
|
|
|
for my $id (split /\s+/, $c) {
|