summaryrefslogtreecommitdiff
path: root/wizards/source/tools
diff options
context:
space:
mode:
authorBehrend Cornelius <bc@openoffice.org>2002-12-02 13:06:55 +0000
committerBehrend Cornelius <bc@openoffice.org>2002-12-02 13:06:55 +0000
commitddf748da19bfd1d5236fc1fb76c62a12f8f5c734 (patch)
tree05993156e38fd420cc8f6ffa8fa95da1c8d6b143 /wizards/source/tools
parent296c5a093268fd2e77dced820ac07e2fa0c822a2 (diff)
#105421# resources for Overwrite dialog added
Diffstat (limited to 'wizards/source/tools')
-rw-r--r--wizards/source/tools/ModuleControls.xba3
1 files changed, 3 insertions, 0 deletions
diff --git a/wizards/source/tools/ModuleControls.xba b/wizards/source/tools/ModuleControls.xba
index 4b211370961b..d5078c2fd65e 100644
--- a/wizards/source/tools/ModuleControls.xba
+++ b/wizards/source/tools/ModuleControls.xba
@@ -321,6 +321,9 @@ Dim OverwriteModel as Object
If InitResources(&quot;&quot;, &quot;com&quot;) Then
QueryString = GetResText(1007)
QueryString = ReplaceString(QueryString, ConvertFromUrl(FilePath), &quot;&lt;PATH&gt;&quot;)
+ If Len(QueryString) &gt; 130 Then
+ QueryString = DeleteStr(QueryString, &quot;.&lt;BR&gt;&quot;)
+ End If
QueryString = ReplaceString(QueryString, chr(13), &quot;&lt;BR&gt;&quot;)
lblYes = GetResText(1008)
lblYesToAll = GetResText(1009)