diff options
author | Joerg Skottke [jsk] <jsk@openoffice.org> | 2010-07-22 13:45:04 +0200 |
---|---|---|
committer | Joerg Skottke [jsk] <jsk@openoffice.org> | 2010-07-22 13:45:04 +0200 |
commit | ceaf442e464c41556db0396c71c54c298d56bf35 (patch) | |
tree | 207929f50a11b701d5f45cba4d65e7c141cef1e1 /testautomation/framework/required | |
parent | e4efcba54fad0d086b312885b902d06f13623b33 (diff) |
jl154: #i113234# Just another way to differentiate between brands, builds, platforms etc.
Diffstat (limited to 'testautomation/framework/required')
-rwxr-xr-x | testautomation/framework/required/includes/script_organizers.inc | 32 |
1 files changed, 19 insertions, 13 deletions
diff --git a/testautomation/framework/required/includes/script_organizers.inc b/testautomation/framework/required/includes/script_organizers.inc index 33fb9e33f18c..399576f8caa2 100755 --- a/testautomation/framework/required/includes/script_organizers.inc +++ b/testautomation/framework/required/includes/script_organizers.inc @@ -52,11 +52,11 @@ testcase tUpdtScripts ' the productname and language. dim sProductString as string : sProductString = gProductName & "_" & gISOLang & "_" - select case ( lcase( gPlatform ) ) - case "osx" : sProductString = sProductString & gPlatform & "_" - end select + ' define platforms that have different scriptcount + if ( gPlatGroup = "win95" ) then sProductString = sProductString & "win_" + if ( gPlatform = "osx" ) then sProductString = sProductString & "osx_" - ' Replace blanks with "-" as usage of blanks is discouraged. + ' replace all blanks sProductString = hStringReplaceChar( sProductString, " ", "-" ) ' This is where reference file is located, the filename is yet incomplete @@ -77,6 +77,9 @@ testcase tUpdtScripts dim sDialog as string dim iCurrentDialog as integer + dim iDiffCount as integer + dim iAllowedModifier as integer + hInitSingleDoc() for iCurrentDialog = 1 to SCRIPTING_DIALOGS @@ -122,17 +125,20 @@ testcase tUpdtScripts end select printlog( "Compare to reference list, create new one if differences were found" ) - if ( hManageComparisionList( sFileIn, sFileOut, cScriptNamesList() ) <> 0 ) then - warnlog( "The number of scripts has changed. Please review!" ) - endif - + iDiffCount = hManageComparisionList( sFileIn, sFileOut, cScriptNamesList() ) + printlog( "Close <" & sDialog & ">" ) select case ( sDialog ) - case DLG_JAVASCRIPT : ScriptOrganizer.cancel() - case DLG_BEANSHELL : ScriptOrganizer.cancel() - case DLG_PYTHON : ScriptOrganizer.cancel() - case DLG_BASIC_ORG : Makro.close() - case DLG_RUN_MACRO : ScriptSelector.cancel() + case DLG_JAVASCRIPT : + ScriptOrganizer.cancel() + case DLG_BEANSHELL : + ScriptOrganizer.cancel() + case DLG_PYTHON : + ScriptOrganizer.cancel() + case DLG_BASIC_ORG : + Makro.close() + case DLG_RUN_MACRO : + ScriptSelector.cancel() end select next iCurrentDialog |