Re: PDFとのラウンドトリップ

名前: 本田
日時: 2007-01-27 19:10:25
IPアドレス: 220.147.90.*

>>46683
textcompが読み込まれているか
どうかのチェックはしてないですし，
okumacroとの整合は考えてないのですが
こんな感じでしょうか．

＃単純すぎるかな・・・
＃vf作ればよいのは間違いないのでしょうが

\documentclass[a4paper]{article}

\usepackage[T1]{fontenc}
\usepackage{textcomp}

\makeatletter

\@namedef{quote@left@OT1}{\char18\relax}
\@namedef{quote@right@OT1}{\char13\relax}

\@namedef{quote@left@T1}{\char0\relax}
\@namedef{quote@right@T1}{\fontencoding{TS1}\selectfont\symbol{39}}


{\catcode39=\active
\catcode96=\active
\gdef\change@qlqr{%
   \catcode13=\active
   \catcode96=\active
   \def'{\@nameuse{quote@right@\f@encoding}}%
   \def`{\@nameuse{quote@left@\f@encoding}}%
   }%
}%


\def\verbatim{\@verbatim\change@qlqr\frenchspacing\@vobeyspaces\@xverbatim}
\@namedef{verbatim*}{\@verbatim\change@qlqr\@sxverbatim}
\def\@verb{\@vobeyspaces\change@qlqr \frenchspacing \@sverb}
\def\@sverb#1{%
  \catcode`#1\active
  \lccode`\~`#1%
  \gdef\verb@balance@group{\verb@egroup
     \@latex@error{\noexpand\verb illegal in command argument}\@ehc}%
  \aftergroup\verb@balance@group
  \lowercase{\let~\verb@egroup}%
  \change@qlqr%%!!
}%
\makeatother


\begin{document}
\verb|`BBB'|

\verb*|`B B B'|

\begin{verbatim}
`AAAAA'
\end{verbatim}
\begin{verbatim*}
`A AA AA'
\end{verbatim*}

\end{document}

この書き込みへの返事：