summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
authorBehrend Cornelius <bc@openoffice.org>2001-06-22 15:17:21 +0000
committerBehrend Cornelius <bc@openoffice.org>2001-06-22 15:17:21 +0000
commit9dee1a3b6ed86dac58d8a20477a13519726a66a9 (patch)
treec95b685ac94a340197ee6be17e38f556f0f53248 /wizards
parent4efb8c00eba851c2c954b785f42310df6b45932c (diff)
#88692# slash after call of 'Directorynameoutofpath' added
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/webwizard/Bullets.xba2
-rw-r--r--wizards/source/webwizard/HtmlAutoPilotBasic.xba5
-rw-r--r--wizards/source/webwizard/Language.xba2
-rw-r--r--wizards/source/webwizard/WebWzrd.xdl6
4 files changed, 8 insertions, 7 deletions
diff --git a/wizards/source/webwizard/Bullets.xba b/wizards/source/webwizard/Bullets.xba
index 06ffb99f8150..7695a20a6861 100644
--- a/wizards/source/webwizard/Bullets.xba
+++ b/wizards/source/webwizard/Bullets.xba
@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="UTF-8"?>
-
+<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Bullets" script:language="StarBasic">REM ***** BASIC *****
diff --git a/wizards/source/webwizard/HtmlAutoPilotBasic.xba b/wizards/source/webwizard/HtmlAutoPilotBasic.xba
index c35bf784ec35..9cd908d815b3 100644
--- a/wizards/source/webwizard/HtmlAutoPilotBasic.xba
+++ b/wizards/source/webwizard/HtmlAutoPilotBasic.xba
@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="UTF-8"?>
-
+<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="HtmlAutoPilotBasic" script:language="StarBasic">
&apos; Variables must be declared
Option Explicit
@@ -247,7 +247,8 @@ Dim SavePath as String
BasicLibraries.LoadLibrary(&quot;Tools&quot;)
GetPaths()
oBaseDocument = StarDesktop.ActiveFrame.Controller.Model
- SavePath = DirectoryNameoutofPath(oBaseDocument.Url, &quot;/&quot;)
+ &apos; Note: The sub DirectoryNameoutofPath should be change, so that the last character is a slash
+ SavePath = DirectoryNameoutofPath(oBaseDocument.Url, &quot;/&quot;) &amp; &quot;/&quot;
oGraphicObjects = oBaseDocument.GraphicObjects
For i = 0 to oGraphicObjects.Count-1
diff --git a/wizards/source/webwizard/Language.xba b/wizards/source/webwizard/Language.xba
index ccd476a9d2c5..74215b36a92f 100644
--- a/wizards/source/webwizard/Language.xba
+++ b/wizards/source/webwizard/Language.xba
@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="UTF-8"?>
-
+<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Language" script:language="StarBasic">Option Explicit
diff --git a/wizards/source/webwizard/WebWzrd.xdl b/wizards/source/webwizard/WebWzrd.xdl
index efb3ae1ae676..99244cb59034 100644
--- a/wizards/source/webwizard/WebWzrd.xdl
+++ b/wizards/source/webwizard/WebWzrd.xdl
@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="UTF-8"?>
-
+<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" dlg:id="WebWzrd" dlg:style-id="0" dlg:left="96" dlg:top="28" dlg:width="270" dlg:height="210">
<dlg:styles>
<dlg:style dlg:style-id="0"/>
@@ -12,7 +12,7 @@
<dlg:button dlg:style-id="0" dlg:id="cbGoOn" dlg:tab-index="2" dlg:left="214" dlg:top="190" dlg:width="50" dlg:height="14" dlg:value="cbGoOn">
<dlg:event dlg:listener-type="com.sun.star.awt.XActionListener" dlg:event-method="actionPerformed" dlg:script-type="StarBasic" dlg:script-code="WebWizard.HtmlAutoPilotBasic.EndDialog"/>
</dlg:button>
- <dlg:img dlg:id="ImagePreview" dlg:tab-index="3" dlg:left="6" dlg:top="6" dlg:width="258" dlg:height="26"/>
+ <dlg:img dlg:id="ImagePreview" dlg:tab-index="3" dlg:left="6" dlg:top="6" dlg:width="258" dlg:height="31"/>
<dlg:menulist dlg:style-id="0" dlg:id="lbTemplate" dlg:tab-index="4" dlg:left="6" dlg:top="53" dlg:width="110" dlg:height="94">
<dlg:event dlg:listener-type="com.sun.star.awt.XItemListener" dlg:event-method="itemStateChanged" dlg:script-type="StarBasic" dlg:script-code="WebWizard.HtmlAutoPilotBasic.ReloadCurrentDocument"/>
</dlg:menulist>
@@ -32,4 +32,4 @@
</dlg:radiogroup>
<dlg:fixedline dlg:style-id="0" dlg:id="hlnBackground" dlg:tab-index="11" dlg:left="154" dlg:top="152" dlg:width="110" dlg:height="9" dlg:value="hlnBackground"/>
</dlg:bulletinboard>
-</dlg:window>
+</dlg:window> \ No newline at end of file