X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/46ed3fdeb5a9966717f27c99b750d13551cb25e9..601c737a133afc2884c7e88d293268918d26f315:/Shiar_Sheet/KeySigns.pm

diff --git a/Shiar_Sheet/KeySigns.pm b/Shiar_Sheet/KeySigns.pm
index f33b224..5de47cb 100644
--- a/Shiar_Sheet/KeySigns.pm
+++ b/Shiar_Sheet/KeySigns.pm
@@ -4,14 +4,9 @@ use utf8;
 use strict;
 use warnings;
 
-our $VERSION = 'v1.01';
+our $VERSION = '1.04';
 
-sub import {
-	my $class = shift;
-
-	my %sign = (
-		-ascii => 0,
-		charset=> 'utf-8',
+our %sign = (
 		arg    => '·',  # described as 'dot'
 		args   => '⁚',
 		argi   => '′',
@@ -23,9 +18,11 @@ sub import {
 		down   => '▼',
 		left   => '◀',
 		sep    => '•',
-		_      => '<wbr>' || "\x{200b}",  # unofficial html, correct ZWNJ character might appear as placeholder
-	);
+		''     => '<wbr>' || "\x{200b}",  # unofficial html, correct ZWNJ character might appear as placeholder
+);
 
+sub import {
+	# exports %sign
 	my ($parent) = caller;
 	eval '*'.$parent.'::sign = \%sign';
 }