On 10/06/2014 12:28 AM, Hans Hagen wrote:
> [...]
> \unexpanded\def\WhateverB#1%
> {\dontleavehmode
> \begingroup
> \tttf
> \prehyphenchar\minusone
> % \localrightbox{\llap{_}}%
> \localrightbox{\llap{\smash{\lower1.5ex\hbox{\char"2192}}}}%
> \setbox\scratchbox\hbox{#1}%
> \prehyphenchar`-\relax
> \unhbox\scratchbox
> \endgroup}
Many thanks for your reply, Hans.
Playing with your suggestion, I came to the following sample:
\definetype[TeXcode][option=TEX]
\unexpanded\def\underscorehyphenation#1%
{\dontleavehmode
\begingroup
\prehyphenchar\minusone
\localrightbox{\llap{\smash{\lower.1ex\hbox{_}}}}%
\setbox\scratchbox\hbox{#1}%
\prehyphenchar`-\relax
\unhbox\scratchbox
\endgroup}
\unexpanded\def\mex#1{\normalexpanded{\TeXcode{\letterbackslash#1}}}
\def\tex#1{\underscorehyphenation{\mex{#1}}}
\define[1]\url{{\tt\goto{\hyphenatedurl{#1}}}[url(#1)]}}
\starttext
\startTEXpage[offset=1em]
\begingroup \hsize1cm
\tex{thisisaboringandverylong[command}\par
\url{thisisaboringandverylongcommand}\par
\endgroup
\stopTEXpage
\stoptext
Is there a way to automatically detect (and apply it to the underscore)
the regular, bold font and its color?
Is there a way to apply both \hyphenatedurl and \underscorehyphenation
to an url?
Many thanks for your help,
Pablo
--
http://www.ousia.tk
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the
Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://tex.aanhet.net
archive : http://foundry.supelec.fr/projects/contextrev/
wiki : http://contextgarden.net
___________________________________________________________________________________
