From 4605e745b6917d32aa6a83f512e23415b8881f20 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Mon, 21 Jun 2021 12:44:50 +0100 Subject: [PATCH] Break out $edits_sources in command line parser Signed-off-by: Ian Jackson --- nailing-cargo | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/nailing-cargo b/nailing-cargo index 3eb4ee4..cc1d9e1 100755 --- a/nailing-cargo +++ b/nailing-cargo @@ -983,6 +983,10 @@ sub parse_args () { $not_a_nailing_opt->() unless m{^-}; $not_a_nailing_opt->() if $_ eq '--'; + my $edits_sources = sub { + $linkfarm_depth = 'copy-edit'; + }; + if ($_ eq '---') { # usage 2 or 3 if (!@ARGV) { die "$self: --- must be followed by build command\n" unless $noact; @@ -1019,7 +1023,7 @@ sub parse_args () { } elsif (s{^-D}{-}) { $dump++; } elsif (s{^-E}{-}) { - $linkfarm_depth = 'copy-edit'; + $edits_sources->(); } elsif (s{^-T(.+)}{-}s) { $target = $1; } elsif (s{^-([oO])}{-}) { @@ -1044,7 +1048,7 @@ sub parse_args () { } elsif (m{^--linkfarm(?:=(no|shallow|git|full))?$}) { $linkfarm_depth = $1 || 'git'; } elsif (m{^--edits?-sources?$}) { - $linkfarm_depth = 'copy-edit'; + $edits_sources->(); } elsif (m{^--just-run$}) { $do_nail = $do_cargo_lock = $do_lock = 0; } elsif (m{^--(clean|keep)-linkfarm$}) { -- 2.30.2