diff options
author | Shlomi Fish <shlomif@shlomifish.org> | 2018-02-12 13:52:37 +0200 |
---|---|---|
committer | Shlomi Fish <shlomif@shlomifish.org> | 2018-02-12 13:52:37 +0200 |
commit | 35f31019faa82c705ec9ef5ca33c4681d55d0d23 (patch) | |
tree | 281e16ef65d30a044869e45152de6a1061c8fb97 | |
parent | 8c4a85c8f45be25f227e023dce832b66dbfdb2c3 (diff) | |
download | monitor-edid-35f31019faa82c705ec9ef5ca33c4681d55d0d23.tar monitor-edid-35f31019faa82c705ec9ef5ca33c4681d55d0d23.tar.gz monitor-edid-35f31019faa82c705ec9ef5ca33c4681d55d0d23.tar.bz2 monitor-edid-35f31019faa82c705ec9ef5ca33c4681d55d0d23.tar.xz monitor-edid-35f31019faa82c705ec9ef5ca33c4681d55d0d23.zip |
Fix perl warning . MGA#22293 .
See https://bugs.mageia.org/show_bug.cgi?id=22293 .
-rwxr-xr-x | monitor-parse-edid | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/monitor-parse-edid b/monitor-parse-edid index c2c9d7a..7fd5fe4 100755 --- a/monitor-parse-edid +++ b/monitor-parse-edid @@ -55,7 +55,7 @@ foreach my $raw_edid (@raw_edids) { use Data::Dumper; $Data::Dumper::Sortkeys = 1; my $s = Dumper($edid); - $s =~ s/.*? = {/+{/; # remove variable name we don't want + $s =~ s/.*? = \{/+{/; # remove variable name we don't want $s =~ s/};$/}/m; print $s; } elsif ($MonitorsDB) { |