/[smeserver]/rpms/e-smith-base/sme8/e-smith-base-5.2.0-OldServerName.patch
ViewVC logotype

Contents of /rpms/e-smith-base/sme8/e-smith-base-5.2.0-OldServerName.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.2 - (show annotations) (download)
Tue Feb 18 06:21:34 2014 UTC (10 years, 8 months ago) by wellsi
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +0 -0 lines
FILE REMOVED
Remove obsolete patch files

1 diff -ruN e-smith-base-5.2.0.old/root/usr/lib/perl5/site_perl/esmith/console/configure.pm e-smith-base-5.2.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm
2 --- e-smith-base-5.2.0.old/root/usr/lib/perl5/site_perl/esmith/console/configure.pm 2013-06-29 08:41:57.000000000 -0700
3 +++ e-smith-base-5.2.0/root/usr/lib/perl5/site_perl/esmith/console/configure.pm 2013-06-29 09:02:01.000000000 -0700
4 @@ -250,16 +250,23 @@
5
6 if ($choice =~ /^([a-zA-Z][a-zA-Z0-9\-]*)$/)
7 {
8 - $db->set_value('SystemName', $SystemName = lc($1));
9 - if ($oldSystemName ne $SystemName)
10 - {
11 - # Delete old static hosts db record if one exists
12 - use esmith::HostsDB;
13 - my $hdb = esmith::HostsDB->open;
14 - my $rec = $hdb->get("$oldSystemName.$DomainName");
15 - $rec->delete if $rec;
16 - }
17 - goto ETHERNET_LOCAL;
18 + $db->set_value('SystemName', $SystemName = lc($1));
19 + if ($oldSystemName ne $SystemName)
20 + {
21 + # Delete old static hosts db record if one exists
22 + use esmith::HostsDB;
23 + my $hdb = esmith::HostsDB->open;
24 + my $rec = $hdb->get("$oldSystemName.$DomainName");
25 + $rec->delete if $rec;
26 +
27 + # Update ServerName if was oldSystemName
28 + my $oldServerName = $db->get_prop("smb", "ServerName");
29 + if ($oldSystemName eq $oldServerName)
30 + {
31 + $db->set_prop("smb", "ServerName", $SystemName);
32 + }
33 + }
34 + goto ETHERNET_LOCAL;
35
36 }
37 else
38

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed