summaryrefslogtreecommitdiff
path: root/basic/source/comp/exprtree.cxx
diff options
context:
space:
mode:
authorStephan Bergmann <sbergman@redhat.com>2015-09-09 10:50:55 +0200
committerStephan Bergmann <sbergman@redhat.com>2015-09-09 10:54:03 +0200
commit1f6b082388c7e1eaa668f02008488b317c0d4988 (patch)
treecff8e8fe8d1166f7e8fae828633b0d3df5592545 /basic/source/comp/exprtree.cxx
parentf3f1919aa4eca2f6180649eda43bcb813b1f0450 (diff)
Fix previous commit
...4b4a7c0d87eb580272aba0777c9021789025bdc0 "Revert a fix that can never have worked in the first place?"---which presumably did work after all, as Noel thankfully pointed out to me, <http://lists.freedesktop.org/archives/libreoffice/2015-September/070193.html> "Re: [Libreoffice-commits] core.git: basic/source 'Revert a fix that can never have worked in the first place?'" Change-Id: I411bfaacbfebf50589290c6a3040d0300c256439
Diffstat (limited to 'basic/source/comp/exprtree.cxx')
-rw-r--r--basic/source/comp/exprtree.cxx3
1 files changed, 2 insertions, 1 deletions
diff --git a/basic/source/comp/exprtree.cxx b/basic/source/comp/exprtree.cxx
index 8b222573502b..53dcfc57e779 100644
--- a/basic/source/comp/exprtree.cxx
+++ b/basic/source/comp/exprtree.cxx
@@ -215,7 +215,8 @@ SbiExprNode* SbiExpression::Term( const KeywordSymbolInfo* pKeywordSymbolInfo )
return new SbiExprNode( aSym );
}
// no keywords allowed from here on!
- if( SbiTokenizer::IsKwd( eTok ) )
+ if( SbiTokenizer::IsKwd( eTok )
+ && (!pParser->IsCompatible() || eTok != INPUT) )
{
pParser->Error( ERRCODE_BASIC_SYNTAX );
bError = true;