XSLT to transform PList XML to something almost XML-like

plist2xml.xsl

<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
	<xsl:output method="xml" />

	<xsl:template match="/plist">
		<xsl:element name="theme">
			<xsl:apply-templates />
		</xsl:element>
	</xsl:template>

	<xsl:template match="dict">
		<xsl:for-each select="key">
			<xsl:element name="{text()}">
				<xsl:apply-templates select="following-sibling::*[1]"/>
			</xsl:element>
		</xsl:for-each>
	</xsl:template>

	<xsl:template match="string">
		<xsl:value-of select="."/>
	</xsl:template>

	<xsl:template match="array">
		<xsl:for-each select="dict">
			<xsl:element name="setting">
				<xsl:apply-templates select="current()"/>
			</xsl:element>
		</xsl:for-each>
	</xsl:template>

</xsl:stylesheet>