info messages start with lower case character

pull/1/head
parent b7e257871d
commit 96f45ec2e7
Signed by: josch
GPG Key ID: F2CBA5C78FBD83E1

@ -4235,7 +4235,7 @@ sub main() {
} }
foreach my $arg (@{ $options->{noop} }) { foreach my $arg (@{ $options->{noop} }) {
info "The option --$arg is a no-op. It only exists for compatibility" info "the option --$arg is a no-op. It only exists for compatibility"
. " with some debootstrap wrappers."; . " with some debootstrap wrappers.";
} }
@ -4633,7 +4633,7 @@ sub main() {
if (!defined $options->{suite}) { if (!defined $options->{suite}) {
# If no suite was specified, then the whole sources.list has to # If no suite was specified, then the whole sources.list has to
# come from standard input # come from standard input
info "Reading sources.list from standard input..."; info "reading sources.list from standard input...";
my $content = do { my $content = do {
local $/; local $/;
## no critic (InputOutput::ProhibitExplicitStdin) ## no critic (InputOutput::ProhibitExplicitStdin)
@ -4784,7 +4784,7 @@ sub main() {
if (scalar @ARGV > 0) { if (scalar @ARGV > 0) {
for my $arg (@ARGV) { for my $arg (@ARGV) {
if ($arg eq '-') { if ($arg eq '-') {
info 'Reading sources.list from standard input...'; info 'reading sources.list from standard input...';
my $content = do { my $content = do {
local $/; local $/;
## no critic (InputOutput::ProhibitExplicitStdin) ## no critic (InputOutput::ProhibitExplicitStdin)

Loading…
Cancel
Save