diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2006-01-06 11:32:50 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2006-01-06 11:32:50 +0000 |
commit | 54f02a371ddc8c651c41fb65180ec7e56048283f (patch) | |
tree | f271b2be2bb51959d4bc08dfadcc351f0405d561 /monitor-edid | |
parent | 5da569d0c7348089a681175e4eac5901fbf649b4 (diff) | |
download | monitor-edid-54f02a371ddc8c651c41fb65180ec7e56048283f.tar monitor-edid-54f02a371ddc8c651c41fb65180ec7e56048283f.tar.gz monitor-edid-54f02a371ddc8c651c41fb65180ec7e56048283f.tar.bz2 monitor-edid-54f02a371ddc8c651c41fb65180ec7e56048283f.tar.xz monitor-edid-54f02a371ddc8c651c41fb65180ec7e56048283f.zip |
have the acpi EDID file in the perl output
Diffstat (limited to 'monitor-edid')
-rwxr-xr-x | monitor-edid | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/monitor-edid b/monitor-edid index 5bc0bea..4dd6311 100755 --- a/monitor-edid +++ b/monitor-edid @@ -25,9 +25,14 @@ if ($0 =~ /monitor-get-edid/) { foreach (@edids) { my ($f, $edid) = @$_; warn "parsing EDID from $f\n" if $opt{verbose}; - open(my $F, '|' . parse_edid()); - print $F $edid; - close $F and $err = 0; + if ($f =~ m!^/!) { + system(parse_edid() . " $f"); + $err = 0 if $? == 0; + } else { + open(my $F, '|' . parse_edid()); + print $F $edid; + close $F and $err = 0; + } print ",\n" if $opt{perl}; } print ")\n" if $opt{perl}; |