get_source_format: Just save format in callers that don't need options

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

1 files changed, 2 insertions, 2 deletions

diff --git a/dgit b/dgit
index 5c672a0..1418d70 100755
--- a/dgit
+++ b/dgit
@@ -1922,7 +1922,7 @@ sub mktree_in_ud_from_only_subdir ($;$) {
     remove_stray_gits($what);
     mktree_in_ud_here();
     if (!$raw) {
-	my ($format, $fopts) = get_source_format();
+	my $format = get_source_format();
 	if (madformat($format)) {
 	    rmtree '.pc';
 	}
@@ -5164,7 +5164,7 @@ sub cmd_pull {
     fetchpullargs();
     determine_whether_split_brain get_source_format();
     if (do_split_brain()) {
-	my ($format, $fopts) = get_source_format();
+	my $format = get_source_format();
 	madformat($format) and fail f_ <<END, $quilt_mode
 dgit pull not yet supported in split view mode (including with view-splitting quilt modes)
 END