summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-11-18 16:44:52 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-11-18 16:44:52 +0000
commite9746d5b1868e7ecdbabce94c47325e05c2f666d (patch)
tree0c1d2ca28c1c3c7fbddb81d4b3d29572895bded7 /perl-install/Xconfig
parentc7a67d1bcbcffaadbbb06be8f11e78e7508eed02 (diff)
downloaddrakx-e9746d5b1868e7ecdbabce94c47325e05c2f666d.tar
drakx-e9746d5b1868e7ecdbabce94c47325e05c2f666d.tar.gz
drakx-e9746d5b1868e7ecdbabce94c47325e05c2f666d.tar.bz2
drakx-e9746d5b1868e7ecdbabce94c47325e05c2f666d.tar.xz
drakx-e9746d5b1868e7ecdbabce94c47325e05c2f666d.zip
make perl_checker happy
Diffstat (limited to 'perl-install/Xconfig')
-rw-r--r--perl-install/Xconfig/card.pm2
-rw-r--r--perl-install/Xconfig/monitor.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Xconfig/card.pm b/perl-install/Xconfig/card.pm
index 870ba3f22..79853c5b5 100644
--- a/perl-install/Xconfig/card.pm
+++ b/perl-install/Xconfig/card.pm
@@ -270,7 +270,7 @@ sub configure {
my ($in, $raw_X, $do_pkgs, $auto, $options) = @_;
my @cards = probe();
- @cards or @cards = ({});
+ @cards or @cards = {};
if (!$cards[0]{server} && !$cards[0]{Driver} || !$auto) {
card_config__not_listed($in, $cards[0], $options) or return;
diff --git a/perl-install/Xconfig/monitor.pm b/perl-install/Xconfig/monitor.pm
index dedac149c..135e1865f 100644
--- a/perl-install/Xconfig/monitor.pm
+++ b/perl-install/Xconfig/monitor.pm
@@ -73,7 +73,7 @@ sub choose {
configure_automatic($monitor, $monitors) and $auto and return 1;
- my %h_monitors = map { ; "$_->{VendorName}|$_->{ModelName}" => $_ } @$monitors;
+ my %h_monitors = map {; "$_->{VendorName}|$_->{ModelName}" => $_ } @$monitors;
ask_monitor:
my $merged_name = do {