Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
require Exporter;
our @ISA = qw(Exporter);
our @EXPORT = qw(initialisation_complete);
+our @EXPORT_OK = qw(@autoreload_extra_files);
use strict;
our $fail_log = 0;
our $startup_mtime;
+our @autoreload_extra_files = ();
+
sub fail_log ($) {
my ($m) = @_;
if ($fail_log) {
autoreload_check($f);
}
}
+ foreach my $f (@autoreload_extra_files) {
+ autoreload_check($f);
+ }
foreach my $f (@{ %opts{autoreload_extra} // [] }) {
autoreload_check($f);
}