summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-08-31 16:47:53 +0000
committerFrancois Pons <fpons@mandriva.com>2001-08-31 16:47:53 +0000
commit37ccb25e7fb0131d0275edf0f4446e0d832a6d9d (patch)
tree0977da1816fe2926a46893bafe2a4d211f8eeb0b
parent50400a788dfb5dd77f93f471f0c5cecdad42b319 (diff)
downloaddrakx-37ccb25e7fb0131d0275edf0f4446e0d832a6d9d.tar
drakx-37ccb25e7fb0131d0275edf0f4446e0d832a6d9d.tar.gz
drakx-37ccb25e7fb0131d0275edf0f4446e0d832a6d9d.tar.bz2
drakx-37ccb25e7fb0131d0275edf0f4446e0d832a6d9d.tar.xz
drakx-37ccb25e7fb0131d0275edf0f4446e0d832a6d9d.zip
added missing AlwaysCore line for second mouse for XF3.
-rw-r--r--perl-install/Xconfigurator.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm
index c37c3d39a..2b3567cd6 100644
--- a/perl-install/Xconfigurator.pm
+++ b/perl-install/Xconfigurator.pm
@@ -926,6 +926,7 @@ sub write_XF86Config {
print G qq( Option "Protocol" "$O->{XMOUSETYPE}"\n);
print F ($id > 1 && " ") . qq( Device "/dev/$O->{device}"\n);
print G qq( Option "Device" "/dev/$O->{device}"\n);
+ print F " AlwaysCore\n" if $id > 1;
#- this will enable the "wheel" or "knob" functionality if the mouse supports it
print F ($id > 1 && " ") . " ZAxisMapping 4 5\n" if $O->{nbuttons} > 3;
print F ($id > 1 && " ") . " ZAxisMapping 6 7\n" if $O->{nbuttons} > 5;
[ { label => N("Net Device"), val => \$card_netconnect, list => [ sort keys %net_devices ], format => sub { $net_devices{$_[0]} || $_[0] }, not_edit => 0 } ])
+ or goto step_ask_confirm;
my @cards = grep {
log::l("[drakgw] Have network card: $_");
@@ -285,8 +285,8 @@ my $reconf_dhcp_server_intf = 1;
if (any { /$device/ } @configured_devices) {
step_warning_already_conf:
my $auto = N("Yes");
- my $_dhcp_details = N("Yes");
-
+ my $_dhcp_details = N("Yes");
+
$in->ask_from(N("Network interface already configured"),
N("Warning, the network adapter (%s) is already configured.
@@ -302,7 +302,7 @@ Network: %s
IP address: %s
IP attribution: %s
Driver: %s", $device, $conf->{NETWORK}, $conf->{IPADDR}, $conf->{BOOTPROTO}, $aliased_devices{$device} || '(unknown)')) } } ]) or goto step_interface_choice;
-
+
if ($auto ne N("Yes")) {
$reconf_dhcp_server_intf = 0;
$server_ip = $conf->{IPADDR} ||= network::network::read_dhcpd_conf()->{option_routers}[0] ||= "192.168.1.1";
@@ -316,7 +316,7 @@ The default DNS entry is the Caching Nameserver configured on the firewall. You
Otherwise, I can reconfigure your interface and (re)configure a DHCP server for you.
"),
- [ { label => N("Local Network adress"), val => \$lan_address, type => 'entry' },
+ [ { label => N("Local Network adress"), val => \$lan_address, type => 'entry' },
{ label => N("Netmask"), val => \$netmask, type => 'entry' } ])
or goto step_warning_already_conf;
$in->ask_from('',
@@ -335,7 +335,7 @@ If you do not know the meaning of an option, simply leave it as it is."),
or goto step_warning_already_conf;
}
}
-
+
if (!($lan_address =~ s/\.0$//)) {
$in->ask_warn('',
N("The Local Network did not finish with `.0', bailing out."));
@@ -358,7 +358,7 @@ network::shorewall::check_iptables($in) or goto step_detectsetup;
#- **********************************
#- * 2nd step: configure
-$wait_configuring = $in->wait_message(N("Configuring..."),
+$wait_configuring = $in->wait_message(N("Configuring..."),
N("Configuring scripts, installing software, starting servers..."));
@@ -560,17 +560,17 @@ if (-f $cups_conf && !$::testing) {
$root_location_start = @cups_conf_content;
@root_location = ("<Location />\n", "</Location>\n");
}
-
+
# Delete all former "Order", "Allow", and "Deny" lines from the root location block
s/^\s*Order.*//, s/^\s*Allow.*//, s/^\s*Deny.*// foreach @root_location;
-
+
# Add the new "Order" and "Deny" lines, add an "Allow" line for the local network
splice(@root_location, -1, 0, $_) foreach "Order Deny,Allow\n", "Deny From All\n", "Allow From 127.0.0.1\n",
"Allow From $lan_address.*\n";
-
+
# Put the changed root location block back into the file
splice(@cups_conf_content, $root_location_start, 0, @root_location);
-
+
output $cups_conf, @cups_conf_content;
}