--- trunk/filter/isn_swish.pm	2003/02/22 23:49:22	20
+++ trunk2/filter/isn_swish.pm	2004/06/10 19:22:40	337
@@ -2,13 +2,12 @@
 
 # example filter to convert ISBN and ISSN to hyphen and non-hyphen version
 
-sub filter {
+sub isn_swish {
 	my @out;
 	foreach my $nr1 (@_) {
 		push @out,$nr1;	# save original
-		my $nr2 = $nr1;
-		$nr2 =~ s/\-//g;
-		push @out,$nr2;	# save version without hyphens
+		$nr1 =~ s/\-//g;
+		push @out,$nr1;	# save version without hyphens
 	}
 	return @out;
 }