… | |
… | |
27 | sub out { |
27 | sub out { |
28 | $ctx[-1]{out} .= join "", @_; |
28 | $ctx[-1]{out} .= join "", @_; |
29 | } |
29 | } |
30 | |
30 | |
31 | sub TEX::view_seq_code { "\@t{$_[1]}" } |
31 | sub TEX::view_seq_code { "\@t{$_[1]}" } |
|
|
32 | sub TEX::view_seq_file { "\@file{$_[1]}" } |
32 | sub TEX::view_seq_bold { "\@strong{$_[1]}" } |
33 | sub TEX::view_seq_bold { "\@strong{$_[1]}" } |
33 | sub TEX::view_seq_italic { "\@emph{$_[1]}" } |
34 | sub TEX::view_seq_italic { "\@emph{$_[1]}" } |
34 | |
35 | |
35 | sub TEX::view_seq_space { escape_texi $_[1] } |
36 | sub TEX::view_seq_space { escape_texi $_[1] } |
36 | sub TEX::view_seq_text { escape_texi $_[1] } |
37 | sub TEX::view_seq_text { escape_texi $_[1] } |