Ansgar pushed to branch master at Debian FTP Team / dak
Commits:
1 changed file:
Changes:
| ... | ... | @@ -1672,6 +1672,7 @@ sub pgp_check($) { |
| 1672 | 1672 |
my @command = ("$conf::gpg", "--no-options", "--batch", "--no-tty",
|
| 1673 | 1673 |
"--trust-model", "always", "--no-default-keyring",
|
| 1674 | 1674 |
(map +("--keyring" => $_), @conf::keyrings),
|
| 1675 |
+ "--verify-options", "no-show-uid-validity",
|
|
| 1675 | 1676 |
"--verify", "-");
|
| 1676 | 1677 |
debug( "executing " . join(" ", @command) );
|
| 1677 | 1678 |
|
| ... | ... | @@ -1706,8 +1707,8 @@ sub pgp_check($) { |
| 1706 | 1707 |
return "";
|
| 1707 | 1708 |
} ## end if ($stat)
|
| 1708 | 1709 |
|
| 1709 |
- $output =~ /^(gpg: )?good signature from (user )?"(.*)"\.?$/im;
|
|
| 1710 |
- ( $signator = $3 ) ||= "unknown signator";
|
|
| 1710 |
+ $output =~ /^(?:gpg: )?good signature from (?:user )?"(.*)"\.?$/im;
|
|
| 1711 |
+ ( $signator = $1 ) ||= "unknown signator";
|
|
| 1711 | 1712 |
if ($conf::debug) {
|
| 1712 | 1713 |
debug("GnuPG signature ok (by $signator)");
|
| 1713 | 1714 |
}
|