get_source_format: Allow callers to just get the format, not options

Use wantarray to distinguish the cases.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

1 files changed, 1 insertions, 1 deletions

diff --git a/dgit b/dgit
index ec0f6ce..5c672a0 100755
--- a/dgit
+++ b/dgit
@@ -4175,7 +4175,7 @@ sub get_source_format () {
     F->error and confess "$!";
     close F;
     chomp;
-    return ($_, \%options);
+    return wantarray ? ($_, \%options) : $_;
 }
 
 sub madformat_wantfixup ($) {