diff options
author | Andrea Gelmini <andrea.gelmini@gelma.net> | 2020-09-25 12:16:14 +0200 |
---|---|---|
committer | Julien Nabet <serval2412@yahoo.fr> | 2020-09-26 09:38:54 +0200 |
commit | ecf3857ce5b098db78ddd12c7f532b7e726e78e6 (patch) | |
tree | 0e577f8c47277002713c74c5f12fd06376fc3f06 /wizards | |
parent | 37976a6eac90e0fdac01ea2ca997bb9c02b51c57 (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.xba | 4 |
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) 'This sub stores the current document in the directory to hold temporary files. - On Error Goto ErrorOcurred + On Error Goto ErrorOccurred aTempURL = GetPathSettings("Temp", 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("STYLES_1"), 16, GetResText("STYLES_0")) On Local Error Goto 0 End Sub |