summaryrefslogtreecommitdiff
path: root/testautomation/graphics/optional/g_findreplace.bas
diff options
context:
space:
mode:
authorIvo Hinkelmann <ihi@openoffice.org>2009-06-17 11:36:51 +0000
committerIvo Hinkelmann <ihi@openoffice.org>2009-06-17 11:36:51 +0000
commit6ed1958b83babfda36cef3512198dfeba98d5894 (patch)
treeefae0b1cbeac4b284d6a280f2ddedf3667916d5b /testautomation/graphics/optional/g_findreplace.bas
parent2574c2381e36c7feac8ed6cfa83bc5bceae509ab (diff)
CWS-TOOLING: integrate CWS automation006
2009-05-26 13:25:30 +0200 jsk r272296 : #i102088# - final cosmetic touch 2009-05-25 14:40:06 +0200 jsk r272244 : #i102202# - quite a chunk. 2009-05-25 05:29:48 +0200 jsk r272215 : #i102202# - Cleanup, code refactored, indention and headers fixed 2009-05-25 04:55:58 +0200 jsk r272214 : #i102088# - update .bas-files to load call GetOLEDefaultNames from external file 2009-05-20 12:55:18 +0200 jsk r272116 : #i102088# Replace old OLE stuff, get it from API, localized
Diffstat (limited to 'testautomation/graphics/optional/g_findreplace.bas')
-rwxr-xr-xtestautomation/graphics/optional/g_findreplace.bas29
1 files changed, 14 insertions, 15 deletions
diff --git a/testautomation/graphics/optional/g_findreplace.bas b/testautomation/graphics/optional/g_findreplace.bas
index cf013a01f2c8..d38945373b4e 100755
--- a/testautomation/graphics/optional/g_findreplace.bas
+++ b/testautomation/graphics/optional/g_findreplace.bas
@@ -1,7 +1,7 @@
'encoding UTF-8 Do not remove or change this line!
'**************************************************************************
'* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
-'*
+'*
'* Copyright 2008 by Sun Microsystems, Inc.
'*
'* OpenOffice.org - a multi-platform office productivity suite
@@ -40,28 +40,27 @@
public glLocale (15*20) as string
sub main
- Call hStatusIn ( "Graphics","g_findreplace.bas")
+ Call hStatusIn ( "Graphics","g_findreplace.bas")
use "graphics\tools\id_tools.inc"
use "graphics\optional\includes\global\g_find_replace.inc"
- GetOLEDefaultNames
- hSetLocaleStrings ( gTesttoolPath + "graphics\tools\locale_1.txt" , glLocale () )
+ hSetLocaleStrings ( gTesttoolPath + "graphics\tools\locale_1.txt" , glLocale () )
- PrintLog "-------------------------" + gApplication + "-------------------"
- Call tiEditSearchAndReplace
- Call tiEditSearchAndReplaceBUGS
+ PrintLog "-------------------------" + gApplication + "-------------------"
+ Call tiEditSearchAndReplace
+ Call tiEditSearchAndReplaceBUGS
- gApplication = "DRAW"
- PrintLog "-------------------------" + gApplication + "-------------------"
- Call tiEditSearchAndReplace
+ gApplication = "DRAW"
+ PrintLog "-------------------------" + gApplication + "-------------------"
+ Call tiEditSearchAndReplace
- Call hStatusOut
+ Call hStatusOut
end sub
sub LoadIncludeFiles
- use "global\system\includes\master.inc"
- use "global\system\includes\gvariabl.inc"
- gApplication = "IMPRESS"
- Call GetUseFiles
+ use "global\system\includes\master.inc"
+ use "global\system\includes\gvariabl.inc"
+ gApplication = "IMPRESS"
+ Call GetUseFiles
end sub