summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan Jackson <ijackson@chiark.greenend.org.uk>2015-08-14 14:16:40 +0100
committerIan Jackson <ijackson@chiark.greenend.org.uk>2015-08-14 18:35:00 +0100
commit43f1531a64965e10262a79b4be473e0417da9da6 (patch)
tree75a9671a2e681bfd555011d09befe97aa9537e15
parent0806f3412f73bbfe32f0f57504c3fff200247a0a (diff)
Use defvalopt scalar ref (no overall functional change)
-rwxr-xr-xdgit8
1 files changed, 3 insertions, 5 deletions
diff --git a/dgit b/dgit
index d4193cc..b9982bb 100755
--- a/dgit
+++ b/dgit
@@ -3122,11 +3122,9 @@ sub defvalopt ($$$$) {
# or $how can be a scalar ref, meaning simply assign the value
}
-defvalopt '--since-version', '-v', '[^_]+|_', sub {
- ($changes_since_version) = @_;
-};
-defvalopt '--distro', '-d', '.+', sub { ($idistro) = (@_); };
-defvalopt '--existing-package', '', '.*', sub { ($existing_package) = (@_); };
+defvalopt '--since-version', '-v', '[^_]+|_', \$changes_since_version;
+defvalopt '--distro', '-d', '.+', \$idistro;
+defvalopt '--existing-package', '', '.*', \$existing_package;
sub parseopts () {
my $om;