4120 |
} |
} |
4121 |
} |
} |
4122 |
|
|
4123 |
sub t2h_default_quotation_prepend_text($$) |
sub t2h_default_quotation_prepend_text($) |
4124 |
{ |
{ |
4125 |
my $style = shift; |
# my $style = shift; |
4126 |
my $text = shift; |
my $text = shift; |
4127 |
return &$I('@b{%{quotation_arg}:} ', {'quotation_arg' => $text}, {'keep_texi' => 1}) if (defined($text)); |
return &$I('@b{%{quotation_arg}:} ', {'quotation_arg' => $text}, {'keep_texi' => 1}) if (defined($text)); |
4128 |
return undef; |
return undef; |
4129 |
} |
} |
4130 |
|
|
4131 |
sub t2h_default_quotation($$$$) |
sub t2h_default_quotation($$$) |
4132 |
{ |
{ |
4133 |
my $text = shift; |
my $text = shift; |
4134 |
my $argument_text = shift; |
my $argument_text = shift; |
4135 |
my $argument_style_texi = shift; |
my $argument_text_texi = shift; |
4136 |
my $argument_style_id = shift; |
# my $argument_style_texi = shift; |
4137 |
|
# my $argument_style_id = shift; |
4138 |
# if (defined($argument_text)) |
# if (defined($argument_text)) |
4139 |
# { |
# { |
4140 |
# return '<blockquote>' . &$I('%{style}:%{quotation}', |
# return '<blockquote>' . &$I('%{style}:%{quotation}', |