From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/6652
Path: main.gmane.org!not-for-mail
From: Hans Hagen <pragma@wxs.nl>
Newsgroups: gmane.comp.tex.context
Subject: Re: Re[3]: Enabling protruding
Date: Thu, 24 Jan 2002 17:05:11 +0100
Sender: owner-ntg-context@let.uu.nl
Message-ID: <5.1.0.14.1.20020124170237.02d7b700@server-1>
References: <5.1.0.14.1.20020124142552.02dbccd8@server-1>
	<5.1.0.14.1.20020124112706.039925c0@server-1>
	<5.1.0.14.1.20020123181552.03559da8@server-1>
	<5.1.0.14.1.20020123181552.03559da8@server-1>
	<5.1.0.14.1.20020124112706.039925c0@server-1>
	<5.1.0.14.1.20020124142552.02dbccd8@server-1>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"; format=flowed
X-Trace: main.gmane.org 1035397168 12494 80.91.224.250 (23 Oct 2002 18:19:28 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 23 Oct 2002 18:19:28 +0000 (UTC)
Cc: bourbaki@bigfoot.com, ntg-context@ntg.nl
Original-To: Taco Hoekwater <taco@elvenkind.com>
In-Reply-To: <20020124163607.31770881.taco@elvenkind.com>
Xref: main.gmane.org gmane.comp.tex.context:6652
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:6652

At 04:36 PM 1/24/2002 +0100, Taco Hoekwater wrote:
>On Thu, 24 Jan 2002 14:45:25 +0100
>"Hans Hagen" <pragma@wxs.nl> wrote:
>
> > sure, but the main problem is that one cannot ask the filesystem what 
> fonts
> > there are (try to open a font file from within tex); also, building this
> > into context only for cmr is not worth the trouble and slowing down 
> overhead
>
>Well, actually, this works ...
>
>\newif\iffontexists
>
>\def\testfont#1{{\batchmode
>   \global\fontexistsfalse
>   \font\junk=#1\junk
>   \ifdim\fontdimen5\junk>0pt
>     \global\fontexiststrue
>   \fi }}
>
>\testfont{cmr10 }
>\testfont{cmmmr10 }

i know -)

actually i had this for some time (and in font-ini.tex there is still the 
leftover:)

%  safer but sometimes introducing newlines in the log
%
%  \batchmode
%  \font\lastloadedfont\fontfile\somefontspec\relax
%  \errorstopmode
%  \edef\lastfontname{\fontname\lastloadedfont}%
%  \ifx\lastfontname\nullfontname
%    \showmessage{\m!fonts}{10}{\fontfile}%
%    \expandafter\font\csname#1\endcsname=\defaultfontfile\somefontspec\relax
%  \else
%    \expandafter\let\csname#1\endcsname\lastloadedfont
%  \fi

as commented: newlines in th elog, and i hate an ungly  log

a pitty that a decent test didn't make it into etex

Hans
-------------------------------------------------------------------------
                                   Hans Hagen | PRAGMA ADE | pragma@wxs.nl
                       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
-------------------------------------------------------------------------
                                   fall-back web server: 
www.pragma-pod.nl
-------------------------------------------------------------------------