diff options
author | Joerg Skottke [jsk] <jsk@openoffice.org> | 2010-05-19 08:12:42 +0200 |
---|---|---|
committer | Joerg Skottke [jsk] <jsk@openoffice.org> | 2010-05-19 08:12:42 +0200 |
commit | 9b901faec75093df73cc3ce6a41fa8125d64ba97 (patch) | |
tree | 7c1ba35e4f5e70698e7048bf28455471332f939f /testautomation/writer/optional/includes/spellcheck | |
parent | e5fdcb5c6bbb0c65054c3c78abf3f782be963c23 (diff) | |
parent | 67fd074aa55fabfa223d33895801ff3a9eff965e (diff) |
vitomation01: Local merge
Diffstat (limited to 'testautomation/writer/optional/includes/spellcheck')
-rwxr-xr-x[-rw-r--r--] | testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc b/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc index e4818c34029f..80b613563dda 100644..100755 --- a/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc +++ b/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc @@ -52,7 +52,7 @@ testcase tToolsSpellcheckWithShortcut '/// Check if Spellcheck dialog comes up with shortcut 'F7' printlog " Open document where the formatting is set to the language we wish to test." TheFile = Convertpath (gTesttoolpath + "writer\optional\input\spellcheck\spellcheck_" + iSprache + ".odt") - if hFileExists ( TheFile ) <> TRUE then + if FileExists ( TheFile ) <> TRUE then Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer." exit sub end if @@ -120,7 +120,7 @@ testcase tToolsSpellcheckCorrect Dim FFText as String TheFile = Convertpath (gTesttoolpath + "writer\optional\input\spellcheck\spellcheck_" + iSprache + ".odt") - if hFileExists ( TheFile ) <> TRUE then + if FileExists ( TheFile ) <> TRUE then Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer." exit sub end if @@ -219,7 +219,7 @@ testcase tToolsSpellcheck1Mistake Dim TheFile as String TheFile = Convertpath (gTesttoolpath + "writer\optional\input\spellcheck\spellcheck_" + iSprache + ".odt") - if hFileExists ( TheFile ) <> TRUE then + if FileExists ( TheFile ) <> TRUE then Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer." exit sub end if @@ -726,7 +726,7 @@ testcase tToolsSpellcheckAutomatic Dim TheFile as String TheFile = Convertpath (gTesttoolpath + "writer\optional\input\spellcheck\spellcheck_" + iSprache + ".odt") - if hFileExists ( TheFile ) <> TRUE then + if FileExists ( TheFile ) <> TRUE then Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer." exit sub end if @@ -1238,7 +1238,7 @@ testcase tToolsThesaurus printlog " Open document where the formatting is set to the language we wish to test." TheFile = Convertpath (gTesttoolpath + "writer\optional\input\spellcheck\spellcheck_" + iSprache + ".odt") - if hFileExists ( TheFile ) <> TRUE then + if FileExists ( TheFile ) <> TRUE then Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer." exit sub end if |