From 568d22df0de14bd41a178279ad878590533507e6 Mon Sep 17 00:00:00 2001
From: Khaled Hosny <khaledhosny@eglug.org>
Date: Fri, 7 Oct 2011 02:33:57 +0200
Subject: Simplify

---
 luaotfload.dtx | 24 ++++++------------------
 1 file changed, 6 insertions(+), 18 deletions(-)

diff --git a/luaotfload.dtx b/luaotfload.dtx
index 6542f8d..7ee3343 100644
--- a/luaotfload.dtx
+++ b/luaotfload.dtx
@@ -556,28 +556,16 @@ require('otfl-fonts-cbk.lua')
 require('otfl-font-clr.lua')
 %    \end{macrocode}
 %
-% \subsection{Post-processing TFM table}
+% \subsection{Font patching callback}
 %
-%    Here we do some final touches to the loaded TFM table before passing it to
-%    the \tex end.
-%
-%    First we create a callback for patching fonts on the fly, to be used by
-%    other packages.
+%    we provide a callback for patching fonts on the fly, to be used by other
+%    packages.
 %    \begin{macrocode}
 luatexbase.create_callback("luaotfload.patch_font", "simple", function() end)
-%    \end{macrocode}
-%
-% then define a function where font manipulation will take place.
-%
-%    \begin{macrocode}
-local function def_font(...)
+
+local function definefont(...)
     local fontdata = fonts.definers.read(...)
     if type(fontdata) == "table" then
-%    \end{macrocode}
-%
-%    Execute any registered font patching callbacks.
-%
-%    \begin{macrocode}
         luatexbase.call_callback("luaotfload.patch_font", fontdata)
     end
     return fontdata
@@ -603,7 +591,7 @@ luatexbase.add_to_callback("hpack_filter",
                            "luaotfload.hpack_filter")
 luatexbase.reset_callback("define_font")
 luatexbase.add_to_callback("define_font",
-                            def_font,
+                            definefont,
                            "luaotfload.define_font", 1)
 %luatexbase.add_to_callback("find_vf_file",
 %                            fonts.vf.find,
-- 
cgit v1.2.3