Lines Matching refs:accent

3172     my $accent = shift;
3173 …}$accent_map{$accent};" if (defined($accent_map{$accent}) and defined($special_accents{$accent}) a…
3174 … $text . 'ring;' if (($accent eq 'ringaccent') and (defined($special_accents{$accent})) and ($text…
3175     return $text . '<' if ($accent eq 'v');
3176 …turn "&${text}cedil;" if (($accent eq ',') and (defined($special_accents{$accent})) and ($text =~ …
3177     return ascii_accents($text, $accent);
3182     my $accent = shift;
3187 …}$accent_map{$accent};" if (defined($accent_map{$accent}) and defined($special_accents{$accent}) a…
3188 … $text . 'ring;' if (($accent eq 'ringaccent') and (defined($special_accents{$accent})) and ($text…
3189     return $text . '<' if ($accent eq 'v');
3190 …turn "&${text}cedil;" if (($accent eq ',') and (defined($special_accents{$accent})) and ($text =~ …
3201         if (exists($unicode_accents{$accent}) and exists($unicode_accents{$accent}->{$text}))
3203              return ('&#' . hex($unicode_accents{$accent}->{$text}) . ';');
3206     return ascii_accents($text, $accent);
3212     my $accent = shift;
3213     return $text if ($accent eq 'dotless');
3214     return $text . $accent if (defined($accent_map{$accent}));
3215     return $text . "''" if ($accent eq 'H');
3216     return $text . '.' if ($accent eq 'dotaccent');
3217     return $text . '*' if ($accent eq 'ringaccent');
3218     return $text . '[' if ($accent eq 'tieaccent');
3219     return $text . '(' if ($accent eq 'u');
3220     return $text . '_' if ($accent eq 'ubaraccent');
3221     return '.' . $text  if ($accent eq 'udotaccent');
3222     return $text . '<' if ($accent eq 'v');
3223     return $text . ',' if ($accent eq ','); 
3375     my $accent = shift;
3379     return ascii_accents($text, $accent);
6819     my $accent = shift;
6827     if ($accent eq 'dotless')
6838     return Unicode::Normalize::NFC($text . chr(hex($unicode_diacritical{$accent}))) 
6839         if (defined($unicode_diacritical{$accent}));
6840     return ascii_accents($text, $accent);
6911     my $accent = shift;
6917     if ($accent eq 'dotless')
6926     return '_' . lc($unicode_accents{$accent}->{$text})
6927         if (defined($unicode_accents{$accent}->{$text}));
6928     return ($text . '_' . lc($unicode_diacritical{$accent})) 
6929         if (defined($unicode_diacritical{$accent}));
6930     return ascii_accents($text, $accent);
6935     my $accent = shift;
6940     if (exists($unicode_accents{$accent}->{$text}) and
6941         exists ($transliterate_map{$unicode_accents{$accent}->{$text}}))
6943          return $transliterate_map{$unicode_accents{$accent}->{$text}};
9949 foreach my $accent (keys(%Texi2HTML::Config::unicode_accents), 'tieaccent', 'dotless')
9951     if (exists $Texi2HTML::Config::command_type{$accent})
9953         $style_type{$accent} = $Texi2HTML::Config::command_type{$accent};
9956     $style_type{$accent} = 'accent';