Advertisement
Guest User

Untitled

a guest
Mar 9th, 2016
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.96 KB | None | 0 0
  1. package Listener::KeepPackages;
  2.  
  3. use iMSCP::Debug;
  4. use iMSCP::EventManager;
  5. use iMSCP::Execute;
  6.  
  7. # For installation of libapache2-mod-php5 package
  8. sub keepPackages
  9. {
  10.     my $packages = shift;
  11.     push @{$packages}, 'libapache2-mod-php5';
  12.     0;
  13. };
  14.  
  15. # Ensure that Apache2 PHP5 module is enabled
  16. # Disablle mpp_worker module (not compatible with php5 module)
  17. # Enable mpm_prefork and php5 modules
  18. sub enablePHP5Apache2mod
  19. {
  20.     my $rs = execute('a2dismod mpm_worker', \my $stdout, \my $stderr);
  21.     debug($stdout) if $stdout;
  22.     error($stderr) if $rs && $stderr;
  23.     return $rs if $rs;
  24.  
  25.     $rs = execute('a2enmod mpm_prefork php5', \$stdout, \$stderr);
  26.     debug($stdout) if $stdout;
  27.     error($stderr) if $rs && $stderr;
  28.     $rs;
  29. }
  30.  
  31. $eventManager = iMSCP::EventManager->getInstance();
  32. $eventManager->register('beforeInstallPackages', \&keepPackages);
  33. $eventManager->register('beforeSetupRestartServices', \&enablePHP5Apache2mod);
  34.  
  35. 1;
  36. __END__
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement