diff options
| author | fukachan <fukachan> | 2003-10-15 04:20:01 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2003-10-15 04:20:01 +0000 |
| commit | b0880a93d3cad8426c419366d72ff9ba08c63d7c (patch) | |
| tree | 32ea01d16f9779131a712a0be4bb031a3503fe88 /fml/lib/FML/Process | |
| parent | fcb8292d9f5b9ac5340360f21a81683155c3b155 (diff) | |
| download | fml8-b0880a93d3cad8426c419366d72ff9ba08c63d7c.tar.gz fml8-b0880a93d3cad8426c419366d72ff9ba08c63d7c.tar.bz2 fml8-b0880a93d3cad8426c419366d72ff9ba08c63d7c.zip | |
bug fix masking variable definition
Diffstat (limited to 'fml/lib/FML/Process')
| -rw-r--r-- | fml/lib/FML/Process/Utils.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/fml/lib/FML/Process/Utils.pm b/fml/lib/FML/Process/Utils.pm index 993a0270..cd7ff0ff 100644 --- a/fml/lib/FML/Process/Utils.pm +++ b/fml/lib/FML/Process/Utils.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Utils.pm,v 1.82 2003/10/14 12:57:46 fukachan Exp $ +# $FML: Utils.pm,v 1.83 2003/10/15 01:03:35 fukachan Exp $ # package FML::Process::Utils; @@ -1419,11 +1419,11 @@ sub set_charset sub get_charset { my ($curproc, $category) = @_; - my $config = $curproc->config(); - my $pcb = $curproc->pcb(); - my $category = $category || "template_file"; - my $default = $config->{ "${category}_charset" } || 'us-ascii'; - my $charset = $pcb->get("charset", $category) || $default || 'us-ascii'; + my $config = $curproc->config(); + my $pcb = $curproc->pcb(); + my $_category = $category || "template_file"; + my $default = $config->{ "${_category}_charset" } || 'us-ascii'; + my $charset = $pcb->get("charset", $_category) || $default || 'us-ascii'; return $charset; } |