diff options
| author | Joerg Skottke [jsk] <jsk@openoffice.org> | 2010-03-02 09:10:47 +0100 |
|---|---|---|
| committer | Joerg Skottke [jsk] <jsk@openoffice.org> | 2010-03-02 09:10:47 +0100 |
| commit | 263994914d04267498f202dd0a4b528c7dc12800 (patch) | |
| tree | 6bb3018f9394a9e1659b82163e1119db2182c32d /testautomation/writer/optional/includes/spellcheck | |
| parent | 4e81c9a7435d287477934e2a4d0c60ad0cf7ddb1 (diff) | |
vitomation01: #i109696 - Removed wrapper function hFileExists() - it does exactly the same as the builtin function FileExists() plus some overhead.
Diffstat (limited to 'testautomation/writer/optional/includes/spellcheck')
| -rwxr-xr-x | 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 f455d37e6c8a..4ad243236cfa 100755 --- a/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc +++ b/testautomation/writer/optional/includes/spellcheck/w_spellcheck.inc @@ -58,7 +58,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 @@ -126,7 +126,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 @@ -225,7 +225,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 @@ -732,7 +732,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 @@ -1244,7 +1244,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 |