--- branches/tehnika/my_unac_string.pm	2004/09/21 16:40:46	457
+++ branches/tehnika/my_unac_string.pm	2004/09/21 16:53:44	458
@@ -4,7 +4,7 @@
 
 use Text::Unaccent 1.02;	# 1.01 won't compile on my platform,
 
-sub my_unac_string($$) {
+sub my_unac_string {
 	my $charset = shift || return;
 	my $string = shift || return;
 	$string = unac_string($charset,$string);