style: nested scss selectors
[sheet.git] / tools / mkimgthumb
index e9d6eb2159286003a9ccc6c28412334d2d01ee70..fae98690b44ca18b1756ab2cc6452cea27865b8b 100755 (executable)
@@ -40,10 +40,10 @@ for my $src (@ARGV) {
        my ($name, @cmds) = split /:(?<!\\:)/, $src =~ s/\.(\w+)\z//r;
        my $ext = $1 // '*';
        print $name;
-       next if $name =~ m/\./;
        unless (-e $src) {
                ($src) = grep {-e} glob qq<"$name"{,:*}.$ext> or next;
        }
+       $name =~ s/\..*//;
        s/\\(.)/$1/g for @cmds;
        print ':';