diff options
| author | Vladimir Glazunov <vg@openoffice.org> | 2010-03-30 13:14:23 +0200 |
|---|---|---|
| committer | Vladimir Glazunov <vg@openoffice.org> | 2010-03-30 13:14:23 +0200 |
| commit | 36a288c52bea707d0b3227c0ec55566e8b43ed0c (patch) | |
| tree | 43c50eddacfce1cc179346df3e2d9a219d7f04cf /testautomation/writer/optional/includes/clipboard | |
| parent | da45295271b802e82a6a3f4afbb6b86a02da570e (diff) | |
native0#161752#greenstate fixe - transplanted from fee134b4457b@native0
Diffstat (limited to 'testautomation/writer/optional/includes/clipboard')
| -rwxr-xr-x[-rw-r--r--] | testautomation/writer/optional/includes/clipboard/clipbrd_func.inc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc b/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc index 88d07951ba6a..bad0c5f41dae 100644..100755 --- a/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc +++ b/testautomation/writer/optional/includes/clipboard/clipbrd_func.inc @@ -415,7 +415,7 @@ function wChangeHTMLCompatibilityExport ( optional wExport as integer ) as integ Dim CurrentExportSet as String Dim RecentExportSet as integer Dim ExportFound as boolean - printlog " This function sets the export in options to 'StarOffice Writer' " + printlog " This function sets the export in options to 'Oracle Open Office Writer' " printlog " Giving a parameter a special export will be chosen " ExportFound = False @@ -426,7 +426,7 @@ function wChangeHTMLCompatibilityExport ( optional wExport as integer ) as integ For i = 1 to Export.GetItemCount Export.Select i CurrentExportset = Export.GetSelText - if Instr(Ucase(CurrentExportset), "STAROFFICE WRITER") then + if Instr(Ucase(CurrentExportset), "Oracle Open Office Writer") then i = Export.GetItemCount + 1 ExportFound = True end if @@ -439,7 +439,7 @@ function wChangeHTMLCompatibilityExport ( optional wExport as integer ) as integ if ExportFound = True then printlog "Export has been changed!" else - Warnlog "Couldn't set Export to StarOffice Writer!" + Warnlog "Couldn't set Export to Oracle Open Office Writer!" end if Kontext "ExtrasOptionenDlg" ExtrasOptionenDlg.OK |