X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=dgit;h=5b44af6bcb351b38c8ac76cd44949883db34f6fa;hb=94f6f3e79813b9ced5dc495eeea248d238fbc7fc;hp=d4193ccd2e8d8df7da4d5c5460a57ea45176ca24;hpb=0806f3412f73bbfe32f0f57504c3fff200247a0a;p=dgit.git

diff --git a/dgit b/dgit
index d4193ccd..5b44af6b 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;