diff options
| author | Andrea Gelmini <andrea.gelmini@gelma.net> | 2014-10-30 12:04:11 +0100 |
|---|---|---|
| committer | Michael Stahl <mstahl@redhat.com> | 2014-10-30 17:16:02 +0000 |
| commit | 0c0e3e7539f683548e93616a30af8ac90c9abad0 (patch) | |
| tree | 530ba0642a63a454cc04b0db372445bf6c665413 /wizards | |
| parent | d665d253eea7b6f311167079893cbfaac566ca8b (diff) | |
Fixed typos. No automatic tools (sed, and so on).
Change-Id: Ia43976d84eede6f699381bc4f3daf89b95e4cb4f
Reviewed-on: https://gerrit.libreoffice.org/12150
Reviewed-by: Bryan Quigley <gquigs@gmail.com>
Reviewed-by: Michael Stahl <mstahl@redhat.com>
Tested-by: Michael Stahl <mstahl@redhat.com>
Diffstat (limited to 'wizards')
| -rw-r--r-- | wizards/source/depot/tools.xba | 6 | ||||
| -rw-r--r-- | wizards/source/gimmicks/GetTexts.xba | 4 | ||||
| -rw-r--r-- | wizards/source/tools/UCB.xba | 2 |
3 files changed, 6 insertions, 6 deletions
diff --git a/wizards/source/depot/tools.xba b/wizards/source/depot/tools.xba index c1d581246318..daadf498899b 100644 --- a/wizards/source/depot/tools.xba +++ b/wizards/source/depot/tools.xba @@ -138,7 +138,7 @@ End Sub ' Updates the cell with the CurrentValue after checking if the -' Newdate is later than the one that is refered to in the annotation +' Newdate is later than the one that is referred to in the annotation ' of the cell Sub InsertCurrentValue(CurValue as Double, iRow as Integer, Newdate as Date) Dim oCell as Object @@ -207,11 +207,11 @@ Dim iLastRow as Integer End Function -Function CheckDocLocale(LocLanguage as String, LocCountry as String) +Function CheckDocLocale(LocLanguage as String, LocCountry as String) Dim bIsDocLanguage as Boolean Dim bIsDocCountry as Boolean bIsDocLanguage = Instr(1, LocLanguage, sDocLanguage, SBBINARY) <> 0 bIsDocCountry = Instr(1, LocCountry, sDocCountry, SBBINARY) <> 0 OR SDocCountry = "" CheckDocLocale = (bIsDocLanguage And bIsDocCountry) End Function -</script:module>
\ No newline at end of file +</script:module> diff --git a/wizards/source/gimmicks/GetTexts.xba b/wizards/source/gimmicks/GetTexts.xba index 53d4675b17ec..9d3dec3be219 100644 --- a/wizards/source/gimmicks/GetTexts.xba +++ b/wizards/source/gimmicks/GetTexts.xba @@ -22,7 +22,7 @@ ' This Macro extracts the Strings out of the currently activated document und inserts them into a logdocument ' The aim of the macro is to provide the programmer an insight into the StarOffice API ' It focusses on how document-Objects are accessed. -' Therefor not only texts of the document-body are retrieved but also Texts of general +' Therefore not only texts of the document-body are retrieved but also Texts of general ' document Objects like, Annotations, charts and general Document Information Public oLogDocument, oLogText, oLogCursor, oLogHeaderStyle, oLogBodyTextStyle as Object @@ -200,7 +200,7 @@ Dim oCell as Object oPara = ParaEnum.NextElement ' Note: The Enumeration ParaEnum lists all tables and Paragraphs. - ' Therefor we have to find out what kind of object "oPara" actually is + ' Therefore we have to find out what kind of object "oPara" actually is If oPara.supportsService("com.sun.star.text.Paragraph") Then ' "oPara" is a Paragraph oTextPortEnum = oPara.createEnumeration diff --git a/wizards/source/tools/UCB.xba b/wizards/source/tools/UCB.xba index e3b1323b2d1a..ed1ae1c719b8 100644 --- a/wizards/source/tools/UCB.xba +++ b/wizards/source/tools/UCB.xba @@ -90,7 +90,7 @@ Dim sFileArray(StartUbound,1) as String ' Retrieve the Index in the Array, where a Filename is positioned If Not IsMissing(sFileContent()) Then If (FieldinArray(sFileContent(), Ubound(sFileContent), RealFileContent)) Then - ' The extension of the current file passes the filter and is therefor admitted to the + ' The extension of the current file passes the filter and is therefore admitted to the ' fileList If Not IsMissing(sExtension) Then If sExtension <> "" Then |