[Po4a-commits] "po4a/lib/Locale/Po4a Man.pm,1.170,1.171"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv21964/lib/Locale/Po4a

Modified Files:
	Man.pm 
Log Message:
This was supposed to be some shift, otherwise, %option is not really a
hash.


Index: Man.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Man.pm,v
retrieving revision 1.170
retrieving revision 1.171
diff -u -d -r1.170 -r1.171
--- Man.pm	17 Jul 2006 20:59:14 -0000	1.170
+++ Man.pm	17 Jul 2006 21:01:53 -0000	1.171
@@ -999,7 +999,7 @@
     return $str;
 }
 sub translate {
-    my ($self,$str,$ref,$type) = @_;
+    my ($self,$str,$ref,$type) = (shift, shift, shift,shift);
     my (%options)=@_;
     my $origstr=$str;