[XeTeX] wish on \showhyphens from xltxtra

[Will Robertson]

On 2010-06-14 05:24:47 +0930, Pablo Rodríguez 
<oinos at web.de> said:

> trying to check whether a rather large passage in ancient Greek was
> properly hyphenated, I realized that it would be extremely helpful if
> xlxtra could provide also the spaces in \showhpyphens.

I agree xltxtra's \showhyphens could be improved.
See attached proposed modification. How is this? Too verbose?

W

\documentclass{article}
\usepackage{xltxtra}
\makeatletter
\def\showhyphens#1{%
  \typeout{^^J***********************
           \string\showhyphens:
           ***********************}%
  \xxt at loopspace \xxt at showhyphens #1 \@nil
  \typeout{^^J***********************%
           ***************%
           ***********************^^J}}
\def\xxt at loopspace#1#2 #3\@nil{%
  #1{#2}%
  \def\@tempa{#3}%
  \ifx\@tempa\@empty\else
    \xxt at loopspace#1#3\@nil
  \fi
}
\makeatother
\begin{document}
\showhyphens{discombobulated hyphenation routine}
\end{document}