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

Annotation 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.1 - (hide annotations) (download)
Sat Jun 29 17:18:03 2013 UTC (11 years, 4 months ago) by wellsi
Branch: MAIN
CVS Tags: e-smith-base-5_2_0-80_el5_sme, e-smith-base-5_2_0-85_el5_sme, e-smith-base-5_2_0-86_el5_sme, e-smith-base-5_2_0-83_el5_sme, e-smith-base-5_2_0-84_el5_sme, e-smith-base-5_2_0-88_el5_sme, e-smith-base-5_2_0-81_el5_sme, e-smith-base-5_2_0-82_el5_sme, e-smith-base-5_2_0-89_el5_sme, e-smith-base-5_2_0-90_el5_sme, e-smith-base-5_2_0-87_el5_sme
* Sat Jun 29 2013 Ian Wells <esmith@wellsi.com> 5.2.0-80.sme
- Update ServerName (Samba netbios name) when SystemName is updated [SME: 7703]

1 wellsi 1.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