4 files changed, 26 insertions, 1315 deletions

diff --git a/testautomation/graphics/required/includes/global/gallery.inc b/testautomation/graphics/required/includes/global/gallery.inc
deleted file mode 100644
index cfdac0029ec1..000000000000
--- a/testautomation/graphics/required/includes/global/gallery.inc
+++ /dev/null
@@ -1,987 +0,0 @@
-'encoding UTF-8  Do not remove or change this line!
-'**************************************************************************
-' DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
-'
-' Copyright 2000, 2010 Oracle and/or its affiliates.
-'
-' OpenOffice.org - a multi-platform office productivity suite
-'
-' This file is part of OpenOffice.org.
-'
-' OpenOffice.org is free software: you can redistribute it and/or modify
-' it under the terms of the GNU Lesser General Public License version 3
-' only, as published by the Free Software Foundation.
-'
-' OpenOffice.org is distributed in the hope that it will be useful,
-' but WITHOUT ANY WARRANTY; without even the implied warranty of
-' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-' GNU Lesser General Public License version 3 for more details
-' (a copy is included in the LICENSE file that accompanied this code).
-'
-' You should have received a copy of the GNU Lesser General Public License
-' version 3 along with OpenOffice.org.  If not, see
-' <http://www.openoffice.org/license.html>
-' for a copy of the LGPLv3 License.
-'
-'/************************************************************************
-'*
-'* owner : wolfram.garten@oracle.com
-'*
-'* short description : Global Required/resource test: Checking the gallery
-'*
-'\******************************************************************************
-testcase tGallery_DialogTest
-    '///Open a new Writer document
-    '///Tools / Gallery
-    printlog "- Working with Gallery-Beamer!"
-    gApplication = "WRITER"
-    call hNewDocument
-    call hOpenGallery
-    Kontext "DocumentWriter"
-        '///+Undock the <i>Gallery Beamer</i>
-        printlog "- undock the Gallery Beamer"
-        Kontext "Gallery"
-            Gallery.Undock ( AlignTop )
-            sleep(2)
-            '///+<ul><li>Move the gallery-window</li></ul>
-            printlog "  - move the gallery window"
-            Gallery.move ( 20, 20 )
-            sleep(2)
-            '///+Dock the <i>Gallery Beamer</i>
-            printlog "- dock the Gallery Beamer"
-            Gallery.Dock ( AlignTop )
-            sleep(2)
-            '///+Close the <i>Gallery Beamer</i> (Tools / Gallery)
-            printlog "- close the Gallery Beamer"
-        ToolsGallery
-    call hCloseDocument
-endcase
-
-'-------------------------------------------------------------------------
-
-testcase tGallery_ActivateAndUpdateAllThemes
-    Dim iThemeCount as Integer
-    Dim i as Integer 
-    Dim j as Integer
-    Dim Gallerytext as string
-    '///Activate and update all gallery themes (NET installation: Activate only!)
-    '///Open a new Writer document
-    '///+Tools / Gallery
-    '///+Click on each theme and update it (via context menu)
-    printlog "activate and update all gallery-themes"
-    gApplication = "WRITER"
-    call hNewDocument
-    Kontext
-    call hOpenGallery
-    Kontext "Gallery"
-        iThemeCount = Gallerys.GetItemCount
-        for i=1 to iThemeCount
-            if gNetzInst = FALSE then
-                Kontext "Gallery"
-                    Gallerytext = Gallerys.GetItemText(i)
-                    printlog "- " + i + ". entry (" & Gallerytext & ")"
-                    Gallerys.Select i
-                    Gallerys.MouseMove ( 10, 10 )
-                    Gallerys.OpenContextMenu
-                    sleep (3)
-                    printlog "  - update"
-                    hMenuSelectNr (1)
-                    sleep (3)
-                    Kontext "Messagebox"
-                    if Messagebox.Exists(3) then
-                        if Messagebox.getRT=304 then
-                            printlog "- 'MyTheme' is the " & i & "'s entry."
-                            Messagebox.No
-                        end if
-                    else
-                        for j = 1 to 800
-                            Kontext "AktualisierenGallery"
-                                if AktualisierenGallery.Exists then
-                                    printlog "DEBUG (j): " & j
-                                    sleep (1)
-                                else
-                                    printlog "DEBUG: 800 reached!"
-                                    j=801
-                                end if
-                        next j
-                    end if
-            end if
-        next i
-    call hCloseDocument
-endcase
-
-'-------------------------------------------------------------------------
-
-testcase tGallery_CheckNames
-    Dim iThemeCount as Integer
-    Dim i as Integer
-    Dim j as Integer
-    Dim ssList (100) as String
-    Dim siList (100) as String
-    Dim sFileName as String
-    Dim iGalleryThemes as integer
-
-    if gOOO = true then 
-        sFileName = ConvertPath ( gTesttoolPath + "graphics\required\input\gallery\gal_oo_" + iSprache + ".txt" )
-    else
-        sFileName = ConvertPath ( gTesttoolPath + "graphics\required\input\gallery\gal_" + iSprache + ".txt" )
-    end if
-
-    '///Check the names for the gallery themes
-    '///Open a new Writer document
-    '///+Tools / Gallery
-    gApplication = "WRITER"
-    call hNewDocument
-    Kontext
-    call hOpenGallery
-    '///+Check the number of gallery themes. For StarOffice: should be 32. For OpenOffice.Org: should be 6.
-    printlog "- check the number of gallery-themes"
-    Kontext "Gallery"
-        if NOT gOOO then 
-            if bAsianLan then
-                iGalleryThemes = 29 ' Flags are not allowed!
-            else
-                iGalleryThemes = 30
-            end if
-        else
-            if bAsianLan then
-                iGalleryThemes = 6  ' Flags are not allowed!
-            else
-                iGalleryThemes = 6
-            end if
-        end if
-        iThemeCount = Gallerys.GetItemCount
-        if (iThemeCount <> iGalleryThemes) then
-            warnlog "Difference in count of gallery themes; found: '" + iThemeCount + "'; expected: '"+ iGalleryThemes +"'"
-        end if
-        for i=1 to iThemeCount
-        Gallerys.Select i
-        ListAppend ( siList(), Gallerys.GetSelText )
-    next i
-    '///+Check all names with a list which depends on language (<i>gTestToolPath</i>/graphics/udpate/input/gallery)
-    printlog "- check the names of gallery-themes"
-    if Dir ( sFilename ) = "" then
-        warnlog "The file for comparison does not exists. The file will be written!"
-        warnlog "Please control : " + sFilename
-        ListWrite ( siList(), sFilename, "utf8" )
-    else
-        printlog "  file for comparison is : " + sFilename
-        ListRead ( ssList (), sFilename, "uft8" )
-        gCompare2Lists ( siList(), ssList () )
-    end if
-    ToolsGallery
-    call hCloseDocument
-endcase
-
-'-------------------------------------------------------------------------
-
-testcase tGallery_CheckContextMenuForGalleryThemes
-    Dim iForBidden as Integer
-    Dim iMenuEntries as Integer
-    Dim i as Integer
-    Dim iThemeCount as Integer
-    '/// Check the contextmenu for the gallery themes
-    '/// Open a new Writer document
-    '/// +Tools / Gallery
-    printlog "check the contextmenu for the gallery-themes"
-    gApplication = "WRITER"
-    call hNewDocument
-    call hOpenGallery
-    '/// +Testing <i>rename</i> and <i>properties</i> for each gallery theme (via context-menu)
-    '/// +<ul><li>Only the private gallery theme must be deleteable (different 3 entries in the context-menu than the rest)</li></ul>
-    Kontext "Gallery"
-        iThemeCount = Gallerys.GetItemCount
-        Gallerys.MouseMove ( 10, 10 )
-        for i=1 to iThemeCount
-            Kontext "Gallery"
-                printlog "- " + i + ". entry"
-                sleep 1
-                Gallerys.Select 1
-                sleep (1)
-                Gallerys.Select i
-                sleep (1)
-                Gallerys.OpenContextMenu
-                sleep (2)
-                iMenuEntries = hMenuItemGetCount
-                if iMenuEntries <> 3 then
-                    if gNetzInst = FALSE then
-                        warnlog "There are not 3 entries! => no test on the contextmenu!"
-                    else
-                        if iMenuEntries <> 1 then
-                            warnlog "Net-Inst : There are not 1 entries! => no test on the contextmenu!"
-                        else
-                            sleep (3)
-                            hMenuSelectNr(1)
-                            Kontext
-                            if Active.GetPageCount <> 1 then
-                                warnlog "There are more than 1 Tabpage in Net-Installation ( perhaps no root-installation )!"
-                            end if
-                            Active.SetPage TabAllgemeinGallery
-                            Kontext "TabAllgemeinGallery"
-                                TabAllgemeinGallery.Cancel
-                                sleep (1)
-                        end if
-                    end if
-                else
-                    sleep (1)
-                    hMenuSelectNr(2)
-                    Kontext "GalleryNewTitle"
-                        GalleryNewTitle.Cancel
-                        sleep(1)
-                        Kontext "Gallery"
-                            Gallerys.OpenContextMenu
-                            sleep (3)
-                            hMenuSelectNr (3)
-                            Kontext
-                            Active.SetPage TabAllgemeinGallery
-                            Active.SetPage TabDateien
-                            Kontext "TabDateien"
-                                TabDateien.Cancel
-                                sleep(1)
-                end if
-        next i
-        ToolsGallery
-    call hCloseDocument
-endcase
-
-'-------------------------------------------------------------------------
-
-testcase tGallery_CreateAndWorkWithANewGalleryThemes
-    Dim iMenuEntries as Integer
-    Dim j as Integer
-    '/// Open a new Writer document
-    '/// Tools / Gallery
-    printlog "create a new gallery-theme ( TT-theme )"
-    gApplication = "WRITER"
-    call hNewDocument
-    call hOpenGallery
-    iMenuEntries = Gallerys.GetItemCount
-    printlog "- Clicking on 'New Theme' and creating a new theme"
-    '/// Create a new gallery-theme
-    '/// + by clicking on <i>New Theme</i>
-    NewTheme.Click
-    '/// +Activate <i>General</i> tabpage and insert <b><i>TT-theme</b></i> as name
-    Kontext
-    Active.SetPage TabAllgemeinGallery
-    Kontext "TabAllgemeinGallery"
-        NeuesThema.SetText "TT-theme"
-        sleep (1)
-        printlog "  - named the new theme 'TT-theme' on the general-page"
-        printlog "  - insert all files out of '[gTestToolpath]\global\input\graf_inp' in the files-page"
-        '/// +Activate <i>Files</i> tabpage
-        Kontext
-        Active.SetPage TabDateien
-        Kontext "TabDateien"
-            printlog "     - click 'add' without a selected file => insert-graphic-dialog has to be be visible"
-            '/// +Click on <i>Add</i> (If no file is selected the <i>Graphic-Insert</i> dialog has to be be opened -> close it)
-            Hinzufuegen.Click
-            sleep (1)
-            Kontext "GrafikEinfuegenDlg"
-                GrafikEinfuegenDlg.Cancel
-                sleep (1)
-                printlog "     - click 'find files' to insert the path for graphics"
-                '///+Click on <i>Find Files</i> => <i>select-path</i> dialog will be visible
-        Kontext "TabDateien"
-            Suche.Click
-            sleep (1)
-            '/// +Insert [gTesttoolPath]/input/global/graf_inp as path-name as click on <i>Select</i>
-        Kontext "OeffnenDlg"
-            Pfad.SetText ( convertPath ( gTesttoolPath + "global\input\graf_inp" ) )
-            sleep (1)
-            Auswaehlen.Click
-            sleep (10)
-            '/// +Click on <i>Add</i> for some graphics
-            printlog "     - 'add' one by one"
-        Kontext "TabDateien"
-        DateiListe.Select 1
-        WaitSlot(1000)
-        Hinzufuegen.Click
-        sleep (1)
-        DateiListe.Select 1
-        Hinzufuegen.Click
-        sleep (1)
-        '/// +Click on <i>Add all</i> for rest of the graphics
-        '/// +<ul><li>apply-dialog -> cancel</li></ul>
-        '/// +click on <i>Add all</i> for rest of the graphics
-        printlog "     - 'add all' for the rest of the files"
-        DateiListe.Select 1
-        HinzufuegenAlle.Click
-        printlog "     - apply-dialog -> cancel"
-        Kontext "ApplyGallery"
-            for j=1 to 100
-                if ApplyGallery.Exists then
-                    try
-                        ApplyGallery.Cancel
-                    catch
-                    endcatch
-                else
-                    if j>5 then j=101
-                        sleep (1)
-                    end if
-                next j
-        Kontext "TabDateien"
-        if DateiListe.GetItemCount > 1 then
-            printlog "     - 'add all' for the rest of the files"
-            DateiListe.Select 1
-            HinzufuegenAlle.Click
-            sleep (2)
-            Kontext "ApplyGallery"
-                for j=1 to 100
-                    If ApplyGallery.Exists then
-                        sleep (1)
-                    else
-                        j=101
-                    end if
-                next j
-        end if
-        Kontext "TabDateien"
-            printlog "  - click 'OK' for the tabpages"
-            TabDateien.OK
-            '/// +Check if the new entry is inserted and select it
-            printlog "  - check if the new entrie is inserted and select it"
-        Kontext "Gallery"
-            if Gallerys.GetItemCount <> ( iMenuEntries + 1 ) then
-                warnlog "No new theme was created => the test ends here"
-                ToolsGallery
-                call hCloseDocument
-            else
-                gMouseClick 50,50            '/// make mouseclick to set focus ///'
-                Kontext "Gallery"
-                Gallerys.Select "TT-theme"
-                Gallerys.MouseMove ( 10, 10 )
-                sleep (1)
-                Gallerys.OpenContextMenu
-                '/// +Update the entry (1. entry in context menu ) => cancel it
-                printlog "  - update the entry => cancel the update"
-                sleep (3)
-                hMenuSelectNr (1)
-                sleep (1)
-                Kontext "AktualisierenGallery"
-                    if AktualisierenGallery.Exists <> TRUE then
-                        AktualisierenGallery.Cancel
-                    end if
-                    do
-                        sleep 1
-                    loop while AktualisierenGallery.Exists
-                    Kontext "Gallery"
-                        Gallerys.Select "TT-theme"
-                        Gallerys.OpenContextMenu
-                        '/// +Update it (1. entry in context menu )
-                        printlog "  - update"
-                        sleep (3)

path: root/cui/uiconfig/ui/querychangelineenddialog.ui

<?xml version="1.0" encoding="UTF-8"?>
<!-- Generated with glade 3.18.3 -->
<interface domain="cui">
  <requires lib="gtk+" version="3.6"/>
  <object class="GtkMessageDialog" id="AskChangeLineEndDialog">
    <property name="can_focus">False</property>
    <property name="border_width">6</property>
    <property name="title" translatable="yes" context="querychangelineenddialog|AskChangeLineEndDialog">Save Arrowhead?</property>
    <property name="resizable">False</property>
    <property name="type_hint">dialog</property>
    <property name="skip_taskbar_hint">True</property>
    <property name="message_type">warning</property>
    <property name="buttons">yes-no</property>
    <property name="text" translatable="yes" context="querychangelineenddialog|AskChangeLineEndDialog">The arrowhead was modified without saving.</property>
    <property name="secondary_text" translatable="yes" context="querychangelineenddialog|AskChangeLineEndDialog">Would you like to save the arrowhead now?</property>
    <child internal-child="vbox">
      <object class="GtkBox" id="messagedialog-vbox">
        <property name="can_focus">False</property>
        <property name="orientation">vertical</property>
        <property name="spacing">12</property>
        <child internal-child="action_area">
          <object class="GtkButtonBox" id="messagedialog-action_area">
            <property name="can_focus">False</property>
            <property name="layout_style">end</property>
          </object>
          <packing>
            <property name="expand">False</property>
            <property name="fill">True</property>
            <property name="pack_type">end</property>
            <property name="position">0</property>
          </packing>
        </child>
      </object>
    </child>
  </object>
</interface>