version 1.9, 2001/01/16 20:52:31
|
version 1.10, 2001/03/26 17:32:30
|
Line 75 sub styleparser {
|
Line 75 sub styleparser {
|
my %style_for_target = @style_array; |
my %style_for_target = @style_array; |
|
|
# check printing |
# check printing |
while (($current_key,$current_value) = each %style_for_target) { |
foreach $current_key (sort keys %style_for_target) { |
&Apache::lonxml::debug("$current_key => $current_value\n"); |
&Apache::lonxml::debug("$current_key => $style_for_target{$current_key}\n"); |
} |
} |
# return result |
# return result |
return %style_for_target; |
return %style_for_target; |
|
|