gal-scan: Transform "-" is interpreted as "use defaults"

diff --git a/bin/gal-scan b/bin/gal-scan
index 5fe5f7fcfc2f1374db97c36703f65d508b46f2be..70c6666a55b7dcc318511081837be468453ba230 100755 (executable)
--- a/bin/gal-scan
+++ b/bin/gal-scan
@@ -106,7 +106,9 @@ foreach my $src (@source) {
        }
        print " ori=", $src->{orientation};
 
-       defined $src->{xf} or $src->{xf} = $gal->get('ScanDefaultTransform');
+       if (!defined $src->{xf} || $src->{xf} eq '-') {
+               $src->{xf} = $gal->get('ScanDefaultTransform');
+       }
        print " xfrm=", $src->{xf};
 
        $src->{title} //= '';