diff options
| author | Kurt Zenker <kz@openoffice.org> | 2004-05-19 12:24:10 +0000 |
|---|---|---|
| committer | Kurt Zenker <kz@openoffice.org> | 2004-05-19 12:24:10 +0000 |
| commit | ba68dd36c3f8567a761a95ef3d9195dece1e87ef (patch) | |
| tree | 5c9a8b16fa5dc915ac6f8b5f151df44bd6ebf9de /wizards/source/tools/Misc.xba | |
| parent | 1fd1c0dc0eeb764808b493432600a09713bf5066 (diff) | |
INTEGRATION: CWS qwizards1 (1.30.58); FILE MERGED
2003/11/24 15:48:04 tv 1.30.58.2: RESYNC: (1.30-1.31); FILE MERGED
2003/11/14 13:08:05 tv 1.30.58.1: changed resources to dbwizres
Diffstat (limited to 'wizards/source/tools/Misc.xba')
| -rw-r--r-- | wizards/source/tools/Misc.xba | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/wizards/source/tools/Misc.xba b/wizards/source/tools/Misc.xba index e4891c209a4c..fe8ce75fb5ea 100644 --- a/wizards/source/tools/Misc.xba +++ b/wizards/source/tools/Misc.xba @@ -755,18 +755,18 @@ Dim ErrMsg as String oDocument = StarDesktop.LoadComponentFromURL(sUrl,"_default",0, NoArgs()) NOMODULEINSTALLED: If (Err <> 0) OR IsNull(oDocument) Then - If InitResources("", "com") Then + If InitResources("", "dbw") Then Select Case sType Case "swriter" - ErrMsg = GetResText(1001) + ErrMsg = GetResText(501) Case "scalc" - ErrMsg = GetResText(1002) + ErrMsg = GetResText(502) Case "simpress" - ErrMsg = GetResText(1003) + ErrMsg = GetResText(503) Case "sdraw" - ErrMsg = GetResText(1004) + ErrMsg = GetResText(504) Case "smath" - ErrMsg = GetResText(1005) + ErrMsg = GetResText(505) Case Else ErrMsg = "Invalid Document Type!" End Select |