Changeset 33171 for main/trunk/greenstone2/bin/script/export.pl

Timestamp:

2019-06-20T22:39:48+12:00 (5 years ago)

Author:

wy59

Message:

First part of commit: following Dr Bainbridge's suggestion for how best to determine what phase of building we're in from within doc.pm. Needs a package level variable, used existing coding pattern in the file that used the our keyword.

File:

• main/trunk/greenstone2/bin/script/export.pl (modified) (2 diffs)

main/trunk/greenstone2/bin/script/export.pl

@@ -69 +69 @@
 #no strict 'subs'; # allow barewords (eg STDERR) as function arguments
 use inexport;
+use doc; # for the variable our $cmd_line_mode ($doc::cmd_line_mode)
 
 
@@ -147 +148 @@
 sub main 
 {
+    $doc::cmd_line_mode = "export";
+
     my $inexport = new inexport("export",\@ARGV,$options,$listall_options);