Adam Lindsay wrote:
Nikolai Weibull said this at Fri, 19 Nov 2004 15:54:03 +0100:
Seems to work fine, thanks.
Not here. It still gobbles spaces in the label:
\unprotect
\def\dodouseURL[#1][#2][#3][#4]%
{\iffirstargument
\iffourthargument
\setgvalue{\v!file:::#1}{\doexternaldocument[#2][#3][#4]}%
\else\ifthirdargument
\setgvalue{\v!file:::#1}{\doexternalurl[#2][#3][#1]}%
\else\ifsecondargument
\setgvalue{\v!file:::#1}{\doexternalurl[#2][][#1]}%
\fi\fi\fi
\fi}
\def\doexternalurl[#1][#2][#3]%
{\bgroup
\doifsomething\@@urstyle{\let\@@iastyle\@@urstyle\let\@@urstyle\empty}%
\doifsomething\@@urcolor{\let\@@iacolor\@@urcolor\let\@@urcolor\empty}%
\doexternaldocument[#1][#2][{\url[#3]}]%
\egroup}
\protect
\setupcolors [state=start]
\setupinteraction [state=start]
\setupurl [color=blue]
\starttext
\useURL[something][something with a space][http://pragma-pod.com/]
link to \from[something] here.
\stoptext
\setupcolors [state=start]
\setupinteraction [state=start]
\setupurl [color=blue]
\starttext
\useURL[something][http://pragma-pod.com/][][something with a space]
link to \from[something] here.
\stoptext
second arg is url, third file, fourth text
-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com
| www.pragma-pod.nl
-----------------------------------------------------------------
_______________________________________________
ntg-context mailing list
[EMAIL PROTECTED]
http://www.ntg.nl/mailman/listinfo/ntg-context
