From: Lady <redacted>
Date: Thu, 11 Apr 2024 16:57:12 +0000 (-0400)
Subject: Disallow archive paths beginning with `/`
X-Git-Tag: 0.7.1~1
X-Git-Url: https://git.ladys.computer/Shushe/commitdiff_plain/618ad43397b628e16729167fab7adfef354434bd?ds=inline;hp=7ae7c33964113408bd8cdee445d90f8057159515

Disallow archive paths beginning with `/`

This would have resulted in final paths starting with `.//`, which,
while probably mostly harmless, is definitely weird.
---

diff --git a/lib/archive2extractor.xslt b/lib/archive2extractor.xslt
index b5fb703..d43be68 100644
--- a/lib/archive2extractor.xslt
+++ b/lib/archive2extractor.xslt
@@ -25,7 +25,7 @@ If a copy of the M·P·L was not distributed with this file, You can obtain one
 			version="1.0"
 		>
 			<xslt:template match="/">
-				<for-each select="书社:archive/*[@书社:archived-as and not(starts-with(@书社:archived-as, '../') or contains(@书社:archived-as, '/../'))]">
+				<for-each select="书社:archive/*[@书社:archived-as and not(starts-with(@书社:archived-as, '../') or starts-with(@书社:archived-as, '/') or contains(@书社:archived-as, '/../'))]">
 					<variable name="href">
 						<text>./extracted/</text>
 						<choose>