Subversion Repositories DevTools

Rev

Rev 7300 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7300 Rev 7303
Line 24... Line 24...
24
use JatsError;
24
use JatsError;
25
use FileUtils;
25
use FileUtils;
26
use JatsCopy;
26
use JatsCopy;
27
InitFileUtils();
27
InitFileUtils();
28
 
28
 
29
 
-
 
30
my $opt_root = $ENV{'GBE_CORE'};
29
my $opt_root = $ENV{'GBE_CORE'};
31
my $opt_package = $opt_root . '/pkg/core_devl';
30
my $opt_package = $opt_root . '/pkg/core_devl';
32
my $opt_interface = $opt_root . '/interface';
31
my $opt_interface = $opt_root . '/interface';
33
my $opt_verbose = $ENV{GBE_VERBOSE} || '0';
32
my $opt_verbose = $ENV{GBE_VERBOSE} || '0';
34
my $opt_force = '1';
33
my $opt_force = '1';
35
 
34
 
36
use FileUtils;
35
use FileUtils;
37
use JatsCopy;
36
use JatsCopy;
38
 
37
 
39
Message ("root: $opt_root");
38
Message ("Root: $opt_root");
40
if ( $opt_force >= 0 )
39
if ( $opt_force >= 0 )
41
{
40
{
42
    Message "Copy in Basic HTML - will clobber existing WEB Page Base";
41
    Message "Copy in Basic HTML - will clobber existing WEB Page Base";
43
    for my $dir (qw(HTML))
42
    for my $dir (qw(HTML))
44
    {
43
    {
Line 56... Line 55...
56
#   Generate the HTML documenation from the POD
55
#   Generate the HTML documenation from the POD
57
#   Generate the HTML TOc
56
#   Generate the HTML TOc
58
#
57
#
59
Message ("Generate HTML documentation" );
58
Message ("Generate HTML documentation" );
60
use JatsDocTools::JatsDocTools;
59
use JatsDocTools::JatsDocTools;
-
 
60
JatsDocTools::UpdateHTML( 
61
JatsDocTools::UpdateHTML( 'force' => $opt_force,
61
                          'force' => $opt_force,
62
                          'verbose' => $opt_verbose,
62
                          'verbose' => $opt_verbose,
63
                          'htmldir' => FullPath("$opt_package/HTML"),
63
                          'htmldir' => FullPath("$opt_package/HTML"),
64
                          'prefix' => FullPath($opt_package),
64
                          #'prefix' => FullPath($opt_package),
65
                          'prefix' => FullPath($opt_root),
65
                          'prefix' => FullPath($opt_root),
66
                          'cacheDir' => FullPath($opt_interface),
66
                          'cacheDir' => FullPath($opt_interface),
67
                          'ChangeLog' => FullPath("$opt_root/ChangeLog.txt"),
67
                          'ChangeLog' => FullPath("$opt_root/ChangeLog.txt"),
68
                          'index' => 1,
68
                          'index' => 1,
69
                          );
69
                          );