X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/902eb27b5902755d9ab891d85fa5febfd6fd69e9..b93feea4a4cd9bb503465ead1b73f89b8f36d429:/common.inc.plp

diff --git a/common.inc.plp b/common.inc.plp
index 31c2c22..bfeb244 100644
--- a/common.inc.plp
+++ b/common.inc.plp
@@ -166,3 +166,11 @@ EOT
 	};
 }
 
+sub showlink {
+	my ($title, $href, $selected) = @_;
+	return sprintf(
+		$selected ? '<strong>%s</strong>' : '<a href="%2$s">%s</a>',
+		EscapeHTML($title), EscapeHTML($href)
+	);
+}
+