summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-09-05 12:05:30 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-09-05 12:05:30 +0000
commit024946449fa61d844aee9f994b407190ce9e1dc9 (patch)
tree033d2577992b97a42852b4c2a61e63d99cfd3e35 /perl-install
parent17b367bb800a6d2a3cec17cc8e995f74e888fe13 (diff)
downloaddrakx-backup-do-not-use-024946449fa61d844aee9f994b407190ce9e1dc9.tar
drakx-backup-do-not-use-024946449fa61d844aee9f994b407190ce9e1dc9.tar.gz
drakx-backup-do-not-use-024946449fa61d844aee9f994b407190ce9e1dc9.tar.bz2
drakx-backup-do-not-use-024946449fa61d844aee9f994b407190ce9e1dc9.tar.xz
drakx-backup-do-not-use-024946449fa61d844aee9f994b407190ce9e1dc9.zip
fix typos
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/Xconfig.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/Xconfig.pm b/perl-install/Xconfig.pm
index 280b7f987..77b5b9c4b 100644
--- a/perl-install/Xconfig.pm
+++ b/perl-install/Xconfig.pm
@@ -207,10 +207,10 @@ sub getinfoFromDDC {
}
my ($h, $v, $size, @m) = @l;
- $O->{hsyncrange} ||= $h =~ /^(\S*)/;
- $O->{vsyncrange} ||= $v =~ /^(\S*)/;
+ $O->{hsyncrange} ||= first($h =~ /^(\S*)/);
+ $O->{vsyncrange} ||= first($v =~ /^(\S*)/);
$O->{size} ||= to_float($size);
- $O->{EISA_ID} = lc($1) if $size =~ /EISA ID: (\S*)/;
+ $O->{EISA_ID} = lc($1) if $size =~ /EISA ID=(\S*)/;
$O->{modelines} ||= join '', @m;
$o;
}