From ecf3c7a83dc84a2ff6ea23e2aaf70b5d31fccd5f Mon Sep 17 00:00:00 2001
From: Mark Wooding <mdw@distorted.org.uk>
Date: Thu, 12 May 2022 11:52:07 +0100
Subject: [PATCH] mason/dhandler: Announce source code through `X-AGPL-Source'
 HTTP header.

---
 mason/dhandler | 1 +
 1 file changed, 1 insertion(+)

diff --git a/mason/dhandler b/mason/dhandler
index 88febcf..2383d6b 100755
--- a/mason/dhandler
+++ b/mason/dhandler
@@ -324,6 +324,7 @@ use Data::Dumper;
 	elsif (-d $st) { $comp = ".contact"; }
 	elsif (-f $st) { $comp = ".image"; }
 	else { $comp = ".not-found"; }
+        $r->header_out("X-AGPL-Source" => $SRCURL);
 	$m->comp($comp, path => $path);
 </%init>
 %
-- 
2.11.0