Use OUString::toChar(), tdf#107885 follow-up
Change-Id: I7615f878d800ae0ad68b68dd1ffedb0471c537f9
diff --git a/sc/source/ui/vba/vbarange.cxx b/sc/source/ui/vba/vbarange.cxx
index 94d32d9..ba115f6 100644
--- a/sc/source/ui/vba/vbarange.cxx
+++ b/sc/source/ui/vba/vbarange.cxx
@@ -4373,7 +4373,7 @@ static void lcl_setTableFieldsFromCriteria( OUString& sCriteria1, const uno::Ref
rFilterField.IsNumeric = true;
rFilterField.NumericValue = fValue;
}
else if ( ScGlobal::getLocaleDataPtr()->getNumDecimalSep()[0] != '.' )
else if ( ScGlobal::getLocaleDataPtr()->getNumDecimalSep().toChar() != '.' )
{
eStatus = rtl_math_ConversionStatus_Ok;
fValue = ::rtl::math::stringToDouble( sCriteria1, '.', 0, &eStatus, &nParseEnd );