update dev300-m58
[ooovba.git] / testautomation / framework / optional / f_toolbar_behavior.bas
blob615b3cb11dff0636ac9220522d575a29a18beec0
1 '**************************************************************************
2 '* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
3 '*
4 '* Copyright 2008 by Sun Microsystems, Inc.
5 '*
6 '* OpenOffice.org - a multi-platform office productivity suite
7 '*
8 '* $RCSfile: f_toolbar_behavior.bas,v $
9 '*
10 '* $Revision: 1.1 $
12 '* last change: $Author: jsk $ $Date: 2008-06-20 07:09:30 $
14 '* This file is part of OpenOffice.org.
16 '* OpenOffice.org is free software: you can redistribute it and/or modify
17 '* it under the terms of the GNU Lesser General Public License version 3
18 '* only, as published by the Free Software Foundation.
20 '* OpenOffice.org is distributed in the hope that it will be useful,
21 '* but WITHOUT ANY WARRANTY; without even the implied warranty of
22 '* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 '* GNU Lesser General Public License version 3 for more details
24 '* (a copy is included in the LICENSE file that accompanied this code).
26 '* You should have received a copy of the GNU Lesser General Public License
27 '* version 3 along with OpenOffice.org. If not, see
28 '* <http://www.openoffice.org/license.html>
29 '* for a copy of the LGPLv3 License.
31 '/************************************************************************
33 '* owner : thorsten.bosbach@sun.com
35 '* short description : Resource test of toolbar behavior
37 '\************************************************************************
39 sub main
40 use "framework\optional\includes\toolbar_behavior.inc"
42 call hStatusIn ( "framework","f_toolbar_behavior.bas" )
44 printlog " resource test of toolbar behavior "
46 call tToolbarBehavior()
48 call hStatusOut
49 end sub
51 '-------------------------------------------------------------------------
52 sub LoadIncludeFiles
53 use "global\system\includes\master.inc"
54 use "global\system\includes\gvariabl.inc"
55 gApplication = "WRITER"
56 call GetUseFiles
57 end sub
58 '-------------------------------------------------------------------------