summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJean-Pierre Ledure <jp@ledure.be>2017-11-03 12:37:20 +0100
committerJean-Pierre Ledure <jp@ledure.be>2017-11-03 12:37:20 +0100
commit42d7a388989d57928a31e62999eb623366a485f0 (patch)
treeb8f93d2f35ebbfea9e9dece1d7ebd19b312e8a2e
parent7bd8f9ed9559a745f3ed59161d282b199edd69a7 (diff)
Access2Base - Correct error in module parsing
Error occurs when an unclosed string is present in a comment
-rw-r--r--wizards/source/access2base/Module.xba2
1 files changed, 1 insertions, 1 deletions
diff --git a/wizards/source/access2base/Module.xba b/wizards/source/access2base/Module.xba
index 4e6156c81b9f..b26ba837936c 100644
--- a/wizards/source/access2base/Module.xba
+++ b/wizards/source/access2base/Module.xba
@@ -445,7 +445,7 @@ Private Function _FindPattern(ByVal psPattern As Variant, Optional ByRef plStart
&apos; Common patterns
Const cstComment = &quot;(&apos;|\bREM\b)[^\n]*$&quot;
-Const cstString = &quot;&quot;&quot;[^&quot;&quot;]*&quot;&quot;&quot;
+Const cstString = &quot;&quot;&quot;[^&quot;&quot;\n]*&quot;&quot;&quot;
Const cstBeginStatement = &quot;(^|:|\bthen\b|\belse\b|\n)[ \t]*&quot;
Const cstEndStatement = &quot;[ \t]*($|:|\bthen\b|\belse\b|\n)&quot;
Const cstContinuation = &quot;[ \t]_\n&quot;