From edecef6df4bae8689ffa738b0d923898337be204 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 21 Aug 2022 15:35:14 +0100
Subject: [PATCH] prefork-interp: @autoreload_extra_files

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 scripts/Proc/Prefork/Interp.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/scripts/Proc/Prefork/Interp.pm b/scripts/Proc/Prefork/Interp.pm
index 04b536e..ab29ebc 100644
--- a/scripts/Proc/Prefork/Interp.pm
+++ b/scripts/Proc/Prefork/Interp.pm
@@ -3,6 +3,7 @@ package Proc::Prefork::Interp;
 require Exporter;
 our @ISA = qw(Exporter);
 our @EXPORT = qw(initialisation_complete);
+our @EXPORT_OK = qw(@autoreload_extra_files);
 
 use strict;
 
@@ -22,6 +23,8 @@ our $socket_path;
 our $fail_log = 0;
 our $startup_mtime;
 
+our @autoreload_extra_files = ();
+
 sub fail_log ($) {
   my ($m) = @_;
   if ($fail_log) {
@@ -303,6 +306,9 @@ sub initialisation_complete {
 	autoreload_check($f);
       }
     }
+    foreach my $f (@autoreload_extra_files) {
+      autoreload_check($f);
+    }
     foreach my $f (@{ %opts{autoreload_extra} // [] }) {
       autoreload_check($f);
     }
-- 
2.30.2