diff options
Diffstat (limited to 'os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm')
| -rw-r--r-- | os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm b/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm index eb2d1713..ef82f301 100644 --- a/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm +++ b/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm @@ -19,6 +19,7 @@ use warnings; our $VERSION = 1.01; # API-version . implementation-version use File::Basename; +use Scalar::Util qw( weaken ); use OpenSLX::Basics; use OpenSLX::Utils; @@ -37,6 +38,8 @@ sub initialize { my $self = shift; $self->{engine} = shift; + weaken($self->{'engine'}); + # avoid circular reference between distro and its engine return 1; } |