thomas: server/perl-kolab/lib/Kolab Conf.pm,1.8,1.9
cvs at kolab.org
cvs at kolab.org
Tue May 5 15:05:51 CEST 2009
Author: thomas
Update of /kolabrepository/server/perl-kolab/lib/Kolab
In directory doto:/tmp/cvs-serv5646/perl-kolab/lib/Kolab
Modified Files:
Conf.pm
Log Message:
Execute duplicate RUNONCHANGE commands only once.
Part of kolab/issue1679 ([kolabconf] Update template META mechanism to
support service restarts)
Index: Conf.pm
===================================================================
RCS file: /kolabrepository/server/perl-kolab/lib/Kolab/Conf.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- Conf.pm 17 Mar 2009 16:46:31 -0000 1.8
+++ Conf.pm 5 May 2009 13:05:49 -0000 1.9
@@ -733,14 +733,18 @@
Kolab::log('T', 'Finished regenerating configuration files', KOLAB_DEBUG );
+ my %cmds = ();
foreach $key (keys %runonchange) {
if (defined $templatehaschanged{$key})
{
- Kolab::log('T', 'Actioning RUNONCHANGE for '.$key, KOLAB_DEBUG );
- my $cmd = $runonchange{$key};
- system($cmd);
- Kolab::log('T', 'Executing command', KOLAB_DEBUG );
+ Kolab::log('T', 'Queueing RUNONCHANGE for '.$key, KOLAB_DEBUG );
+ $cmds{$runonchange{$key}} = 1;
}
+ }
+ my $cmd;
+ foreach $cmd (keys %cmds) {
+ Kolab::log('T', 'Executing command: '.$cmd, KOLAB_DEBUG );
+ system($cmd);
}
}
More information about the commits
mailing list