X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=dgit.git;a=blobdiff_plain;f=dgit;h=b9982bbbefb656f36a578595a3752cedd7145e09;hp=d4193ccd2e8d8df7da4d5c5460a57ea45176ca24;hb=43f1531a64965e10262a79b4be473e0417da9da6;hpb=0806f3412f73bbfe32f0f57504c3fff200247a0a diff --git a/dgit b/dgit index d4193ccd..b9982bbb 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;