[Libreoffice-commits] core.git: wizards/source

[Andrea Gelmini (via logerrit)]

 wizards/source/template/Samples.xba |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

New commits:
commit ecf3857ce5b098db78ddd12c7f532b7e726e78e6
Author:     Andrea Gelmini <andrea.gelm...@gelma.net>
AuthorDate: Fri Sep 25 12:16:14 2020 +0200
Commit:     Julien Nabet <serval2...@yahoo.fr>
CommitDate: Sat Sep 26 09:38:54 2020 +0200

    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 <serval2...@yahoo.fr>

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
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits