From f928dde9b40906d4813c9acd140a80340adaa8ec Mon Sep 17 00:00:00 2001
From: Thorsten Bosbach <tbo@OpenOffice.org>
Date: Mon, 25 Oct 2010 17:00:01 +0200
Subject: #i115106# math part

---
 testautomation/math/optional/includes/m_101_.inc | 27 ++----------------------
 1 file changed, 2 insertions(+), 25 deletions(-)
 mode change 100755 => 100644 testautomation/math/optional/includes/m_101_.inc

(limited to 'testautomation/math')

diff --git a/testautomation/math/optional/includes/m_101_.inc b/testautomation/math/optional/includes/m_101_.inc
old mode 100755
new mode 100644
index 989857403546..58582452dc63
--- a/testautomation/math/optional/includes/m_101_.inc
+++ b/testautomation/math/optional/includes/m_101_.inc
@@ -302,7 +302,7 @@ function TBOloadFormulaFromFile () as string
 '///+  take formula out of command window ///
 '///+  save it into a variable ///
 '///  close dokument ///
-   Call hFileOpen ( ConvertPath(gTesttoolPath + "math/optional/input/101_1.sxm") )
+   Call hFileOpenLocally ( ConvertPath(gTesttoolPath + "math/optional/input/101_1.sxm") )
    kontext "dokumentwriter"
    try
    EditSelectAllMath
@@ -344,8 +344,7 @@ testcase tFilePrint
        goto endsub
    endif
 
-    Call hFileOpen ( ConvertPath(gTesttoolPath + "math/optional/input/101_2.sxw") )
-    TBOmakeWriteable()
+    Call hFileOpenLocally ( ConvertPath(gTesttoolPath + "math/optional/input/101_2.sxw") )
 
     '/// find the translated formula in the document and get the language it belongs to ///'
     '///+ compare it to the officelanguage ///'
@@ -581,28 +580,6 @@ testcase tFilePrint
 endcase
 
 
-function TBOmakeWriteable()
-   ' check if writeable! (especially for HTML Doks!!)
-   sleep (3)
-   try
-      UseBindings
-      FormatStyleBold
-      sleep 2
-      FormatStyleBold
-   catch
-   '/// make document writeable :-)///'
-      kontext "Funktionsleiste"
-      printlog "ReadOnly, changed it to writeable."
-      Bearbeiten.click
-      kontext
-      if active.exists (5) then
-         Printlog " active, accessrights ?!: '"+active.GetText+"'"
-         active.yes
-      endif
-   endcatch
-   sleep (3)
-end function
-
 function isCheckedWarnAlienFormat (optional bChange as boolean)
     dim uno
     dim ap
-- 
cgit