--- otfl-font-def.lua-orig	2010-06-20 23:35:33.000000000 +0200
+++ otfl-font-def.lua	2013-03-13 16:25:57.000000000 +0100
@@ -1,3 +1,8 @@
+
+-- $Id: otfl-font-def.lua 47 2013-03-13 15:25:57Z reinhard $
+
+-- THIS IS A MODIFIED FILE.  DO NOT DISTRIBUTE THIS FILE!
+
 if not modules then modules = { } end modules ['font-def'] = {
     version   = 1.001,
     comment   = "companion to font-ini.mkiv",
@@ -5,6 +10,17 @@
     copyright = "PRAGMA ADE / ConTeXt Development Team",
     license   = "see context related readme files"
 }
+------------------------------------------------
+-- Added by RK (20130312):
+------------------------------------------------
+do
+   local s=' This is a modified version of otfl-font-def.lua.'
+   local l=string.rep('=', string.len(s)+1)..'\n'
+   
+   texio.write_nl('\n\n'..l..l..s..'\n' ..
+		  ' Do not distribute this file!\n'..l..l)
+end
+------------------------------------------------
 
 local format, concat, gmatch, match, find, lower = string.format, table.concat, string.gmatch, string.match, string.find, string.lower
 local tostring, next = tostring, next
@@ -628,6 +644,20 @@
 
     end
     statistics.stoptiming(fonts)
+
+    ------------------------------------------------
+    -- Added by RK (20130219):
+    ------------------------------------------------
+    for k,v in pairs(fontdata) do
+    -- print(k,v)
+       if k=='filename' then
+	  -- print(type(v))
+          fontdata.filename=v:gsub('^.*/', '')
+          texio.write_nl('==> "'..fontdata.filename..'" (path stripped).')
+       end
+    end
+    ------------------------------------------------
+
     return fontdata
 end