You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
56 lines
1.9 KiB
56 lines
1.9 KiB
@echo off
|
|
|
|
Rem #########################################################################
|
|
Rem Set user templates and custom dictionary paths
|
|
Rem
|
|
SET UserTemplatesPath=#USERTEMPLATESPATH#
|
|
SET UserCustomDicPath=#USERCUSTOMDICPATH#
|
|
SET UserCustomDicFile=%UserCustomDicPath%\#CUSTOMDICNAME#
|
|
SET UserAppTemplatesPath=%UserTemplatesPath%\#APPPATHNAME#
|
|
SET UserAppWebTemplatesPath=%UserTemplatesPath%\#APPWEBPATHNAME#
|
|
|
|
Rem #########################################################################
|
|
Rem Set common templates and custom dictionary paths
|
|
Rem
|
|
SET CommonTemplatesPath=#COMMONTEMPLATESPATH#
|
|
SET CommonCustomDicPath=#COMMONCUSTOMDICPATH#
|
|
SET CommonCustomDicFile=%CommonCustomDicPath%\#CUSTOMDICNAME#
|
|
SET CommonAppTemplatesPath=%CommonTemplatesPath%\#APPPATHNAME#
|
|
SET CommonAppWebTemplatesPath=%CommonTemplatesPath%\#APPWEBPATHNAME#
|
|
|
|
Rem #########################################################################
|
|
Rem Create directories for application specific data in the
|
|
Rem user's home directory.
|
|
Rem
|
|
|
|
call TsMkUDir "%UserTemplatesPath%"
|
|
call TsMkUDir "%UserCustomDicPath%"
|
|
call TsMkUDir "%RootDrive%\%MY_DOCUMENTS%"
|
|
|
|
Rem #########################################################################
|
|
|
|
Rem
|
|
Rem Copy Custom.dic file to user's directory
|
|
Rem
|
|
|
|
If Exist "%UserCustomDicFile%" Goto Skip1
|
|
If Not Exist "%CommonCustomDicFile%" Goto Skip1
|
|
Copy "%CommonCustomDicFile%" "%UserCustomDicFile%" >Nul: 2>&1
|
|
:Skip1
|
|
|
|
|
|
Rem #########################################################################
|
|
|
|
Rem
|
|
Rem Copy Templates into User's Template Area
|
|
Rem
|
|
|
|
If Exist "%UserAppTemplatesPath%" Goto Skip2
|
|
If Not Exist "%CommonAppTemplatesPath%" Goto Skip2
|
|
xcopy "%CommonAppTemplatesPath%" "%UserAppTemplatesPath%" /E /I >Nul: 2>&1
|
|
:Skip2
|
|
|
|
if Exist "%UserAppWebTemplatesPath%" Goto Skip3
|
|
if Not Exist "%CommonAppWebTemplatesPath%" Goto Skip3
|
|
xcopy "%CommonAppWebTemplatesPath%" "%UserAppWebTemplatesPath%" /E /I >Nul: 2>&1
|
|
:Skip3
|