diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index f4373f511..e847bc197 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -13,6 +13,7 @@ - fix ordering of statuses in In/Out board - fix package importing - remove caching behavior, will always send content to the client if they ask + - fix: can't turn off Is Group Admin setting 7.4.5 - fix: Apostrophy incorrectly escaped as double quote in some places diff --git a/lib/WebGUI/Form/Radio.pm b/lib/WebGUI/Form/Radio.pm index ed4edfbc5..df9774a53 100644 --- a/lib/WebGUI/Form/Radio.pm +++ b/lib/WebGUI/Form/Radio.pm @@ -97,8 +97,9 @@ Renders and input tag of type radio. =cut sub toHtml { - my $self = shift; - my $value = $self->fixMacros($self->fixQuotes($self->fixSpecialCharacters($self->get("value")))) || ''; + my$self = shift; + my $value = $self->get('value'); + $value = defined $value ? $self->fixMacros($self->fixQuotes($self->fixSpecialCharacters($value))) : ''; my $checkedText = $self->get("checked") ? ' checked="checked"' : ''; my $idText = $self->get('id') ? ' id="'.$self->get('id').'" ' : ''; return 'get("extras")||'').' />';