TeX中重定义插图/表格目录

Q: 在book类环境下，在插图目录和表格目录中，如何在每条前冠以“图”字或“表”字？

A: 在/begin{CJK*}后面加上

    /renewcommand/figurename{图}
    /renewcommand/tablename{表}
    /makeatletter
    /long/def/@caption#1[#2]#3{%
     /par
     /addcontentsline{/csname ext@#1/endcsname}{#1}%
       {/protect/numberline{/csname fnum@#1/endcsname}{/ignorespaces #2}}%
     /begingroup
       /@parboxrestore
       /if@minipage
         /@setminipage
       /fi
       /normalsize
       /@makecaption{/csname fnum@#1/endcsname}{/ignorespaces #3}/par
     /endgroup}
    /makeatother