--- stem.pl	2007/06/28 10:34:39	15
+++ stem.pl	2007/06/28 10:38:34	16
@@ -36,7 +36,7 @@
 
 	my $orig = $_;
 
-	my $stem = StemHr::stem($_);
+	my $stem = StemHR->stem($_);
 
 	if (s/^(.+)\s(\d+)$/$1\t$2/g) {
 		$rules{$2}++;