summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
authorAndrea Gelmini <andrea.gelmini@gelma.net>2020-09-25 12:16:14 +0200
committerJulien Nabet <serval2412@yahoo.fr>2020-09-26 09:38:54 +0200
commitecf3857ce5b098db78ddd12c7f532b7e726e78e6 (patch)
tree0e577f8c47277002713c74c5f12fd06376fc3f06 /wizards
parent37976a6eac90e0fdac01ea2ca997bb9c02b51c57 (diff)
Fix typo in code
It passed "make check" on Linux Change-Id: I66b0ea493386cb93780d52b76d5f035ecf7c6541 Reviewed-on: https://gerrit.libreoffice.org/c/core/+/103451 Tested-by: Jenkins Reviewed-by: Julien Nabet <serval2412@yahoo.fr>
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/template/Samples.xba4
1 files changed, 2 insertions, 2 deletions
diff --git a/wizards/source/template/Samples.xba b/wizards/source/template/Samples.xba
index 3009f4cba705..25ff81bcf14d 100644
--- a/wizards/source/template/Samples.xba
+++ b/wizards/source/template/Samples.xba
@@ -110,7 +110,7 @@ End Sub
Sub SaveCurrentStyles(oDocument as Object)
&apos;This sub stores the current document in the directory to hold temporary files.
- On Error Goto ErrorOcurred
+ On Error Goto ErrorOccurred
aTempURL = GetPathSettings(&quot;Temp&quot;, False)
Dim aRightMost as String
aRightMost = Right(aTempURL, 1)
@@ -126,7 +126,7 @@ Sub SaveCurrentStyles(oDocument as Object)
oDocument.storeToURL(aTempURL, NoArgs())
Exit Sub
-ErrorOcurred:
+ErrorOccurred:
MsgBox(GetResText(&quot;STYLES_1&quot;), 16, GetResText(&quot;STYLES_0&quot;))
On Local Error Goto 0
End Sub