|
@@ -11,6 +11,8 @@ use Gsg::ConfigParse qw(parse_gsg_config);
|
|
use Gsg::Gather qw(get_file_tree get_projects trim_project_paths);
|
|
use Gsg::Gather qw(get_file_tree get_projects trim_project_paths);
|
|
use Gsg::Html qw(write_file append_file write_root_index clean_web_root write_project_content);
|
|
use Gsg::Html qw(write_file append_file write_root_index clean_web_root write_project_content);
|
|
|
|
|
|
|
|
+my $start_time = time();
|
|
|
|
+
|
|
# TODO set this in config file?
|
|
# TODO set this in config file?
|
|
my $log_file = "gsg.log";
|
|
my $log_file = "gsg.log";
|
|
sub get_log_name { return $log_file; };
|
|
sub get_log_name { return $log_file; };
|
|
@@ -99,5 +101,7 @@ if ( $config{'CloneEnabled'} eq "yes" ) {
|
|
}
|
|
}
|
|
|
|
|
|
write_project_content($git_projects_ref,$trimmed_git_projects_ref,$web_projects_dir,$clone_path,$logger);
|
|
write_project_content($git_projects_ref,$trimmed_git_projects_ref,$web_projects_dir,$clone_path,$logger);
|
|
-
|
|
|
|
|
|
+my $end_time = time();
|
|
|
|
+my $run_time = $end_time - $start_time;
|
|
|
|
+print "Took $run_time seconds\n";
|
|
$logger->info("Done");
|
|
$logger->info("Done");
|