At 10:06 AM 9/20/2002 +0200, Taco Hoekwater wrote:
>Hi,
>
>Something like this would be good to have in the context core. (watch
>the *like this*).
right, needs some thinking -)
texexec --version
> TeXExec 2.6 - ConTeXt / PRAGMA ADE 1997-2001
> TeXUtil 7.3 - ConTeXt / PRAGMA ADE 1992-2000
> cont-en: ver: 2001.11.13 fmt: 2002.8.28 int: english mes: english
> cont-nl: ver: 2001.11.13 fmt: 2002.8.28 int: dutch mes: dutch
> tex: pdfeTeX, Version 3.14159-1.00b-pretest-20020211-2.1 (Web2C 7.3.7)
>
>Is that doable?
sure, see attached version.pl
this is windows, so can you sort out the > redirection alternative for unix?
Hans
$texexec = $texutil = $pdfetex = $english = $dutch = "" ;
sub AnalyzeVersion
{ open (LOG, "texexec.tmp") ;
while (<LOG>)
{ chomp ;
if (/^\s*(.*TeXExec.*?)\s*$/o) { $texexec = $1 }
elsif (/^\s*(.*TeXUtil.*?)\s*$/o) { $texutil = $1 }
elsif (/^\s*(.*pdf(|e)TeX.*?)\s*$/o) { $pdfetex = $1 }
elsif (/^\s*(.*int: english.*?)\s*$/o) { $english = $1 }
elsif (/^\s*(.*int: dutch.*?)\s*$/o) { $dutch = $1 } }
close (LOG) }
open (TEX,">texexec.tex") ;
print TEX "\\starttext test \\stoptext" ;
close (TEX) ;
unlink ("texexec.tui") ;
unlink ("texexec.tuo") ;
system("texexec --interface=en texexec.tex > texexec.tmp") ;
AnalyzeVersion ;
system("texexec --once --interface=nl texexec.tex > texexec.tmp") ;
AnalyzeVersion ;
print "current distribution:\n\n" ;
print "texexec : $texexec\n" ;
print "texutil : $texutil\n" ;
print "pdf(e)tex : $pdfetex\n" ;
print "cont-en : $english\n" ;
print "cont-nl : $dutch\n" ;
print "\n" ;
-------------------------------------------------------------------------
Hans Hagen | PRAGMA ADE | [EMAIL PROTECTED]
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: +31 (0)38 477 53 69 | fax: +31 (0)38 477 53 74 | www.pragma-ade.com
-------------------------------------------------------------------------
information: http://www.pragma-ade.com/roadmap.pdf
documentation: http://www.pragma-ade.com/showcase.pdf
-------------------------------------------------------------------------
