From 8a429d3f9145858ef0d0467a1825ab499e6a65df Mon Sep 17 00:00:00 2001 From: Oliver Tappe Date: Tue, 10 Jul 2007 21:02:06 +0000 Subject: * fixed crashing bug introduced with last commit git-svn-id: http://svn.openslx.org/svn/openslx/trunk@1235 95ad53e4-c205-0410-b2fa-d234c58c8868 --- bin/slxsettings | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'bin') diff --git a/bin/slxsettings b/bin/slxsettings index 5aa0dfa3..f1b35019 100755 --- a/bin/slxsettings +++ b/bin/slxsettings @@ -162,8 +162,12 @@ sub changedHandler # invoke a key-specific change handler if it exists: $key =~ tr[-][_]; - no strict 'refs'; ## no critic (ProhibitNoStrict) - "${key}_changed_handler"->(); + # we do the following function call in an eval as that function may simply + # not exist: + eval { + no strict 'refs'; ## no critic (ProhibitNoStrict) + "${key}_changed_handler"->(); + }; return; } -- cgit v1.2.3-55-g7522