From 030a769187da992e817ee86edd8b8201e7cc8dae Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Marc=20V=C3=A9ron?= <veron@veron.ch>
Date: Thu, 25 May 2017 21:52:09 +0200
Subject: [PATCH] Bug 18665: Add test for HtmlTags.pm

This patch adds tests for the tt filter HtmlTags.pm

To test: prove -v t/HtmlTags.t should pass
---
 t/HtmlTags.t | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100755 t/HtmlTags.t

diff --git a/t/HtmlTags.t b/t/HtmlTags.t
new file mode 100755
index 0000000..3746d2c
--- /dev/null
+++ b/t/HtmlTags.t
@@ -0,0 +1,25 @@
+#!/usr/bin/perl
+#
+# This module tests the HtmlTag filter
+#
+
+use strict;
+use warnings;
+
+use Test::More tests => 4;
+
+BEGIN { use_ok('Koha::Template::Plugin::HtmlTags'); }
+
+my $filter = Koha::Template::Plugin::HtmlTags->new();
+ok ($filter, "new()");
+
+
+# Test simple tag
+my $expected = '<h1>TEST</h1>';
+my $created = $filter->filter('TEST','', {tag => 'h1'} );
+is( $created, $expected, "Testing simple tag works: $expected - $created");
+
+# Test tag with attributes
+$expected = '<h1 class="MYCLASS" title="MYTITLE">TEST</h1>';
+$created = $filter->filter('TEST','', {tag => 'h1', attributes => 'class="MYCLASS" title="MYTITLE"'} );
+is($created, $expected, "Testing tag with attributes works: $expected - $created");
-- 
2.1.4