From 8e51a7b31e4265b3280b58fb8d47271518c1dd47 Mon Sep 17 00:00:00 2001 From: Steve Beattie Date: Wed, 6 Oct 2010 12:21:56 -0700 Subject: [PATCH] From: Jesse Michael One of the uses of eval { } wasn't checking $@ for errors, so if something bad happened, it'd be silently ignored. This just adds in an extra check to die if we hit a failure. --- utils/SubDomain.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/utils/SubDomain.pm b/utils/SubDomain.pm index c5780fcb4..fa6eda8f8 100755 --- a/utils/SubDomain.pm +++ b/utils/SubDomain.pm @@ -946,6 +946,8 @@ sub autodep_base($$) { readinactiveprofiles(); # need to read the profiles to see if an # inactive local profile is present $profile_data = eval { get_profile($pname) }; + # propagate any errors we hit inside the get_profile call + if ($@) { die $@; } unless ($profile_data) { $profile_data = create_new_profile($pname);