summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/luatex/luaintro/04-04-17.lualtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/luatex/luaintro/04-04-17.lualtx')
-rw-r--r--Master/texmf-dist/doc/luatex/luaintro/04-04-17.lualtx70
1 files changed, 70 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/luatex/luaintro/04-04-17.lualtx b/Master/texmf-dist/doc/luatex/luaintro/04-04-17.lualtx
new file mode 100644
index 00000000000..1aee18ad883
--- /dev/null
+++ b/Master/texmf-dist/doc/luatex/luaintro/04-04-17.lualtx
@@ -0,0 +1,70 @@
+%%
+%% Ein Beispiel der DANTE-Edition
+%%
+%% 1. Auflage
+%%
+%% Beispiel 04-04-17 auf Seite 100.
+%%
+%% Copyright (C) 2013 Herbert Voss
+%%
+%% It may be distributed and/or modified under the conditions
+%% of the LaTeX Project Public License, either version 1.3
+%% of this license or (at your option) any later version.
+%%
+%% See http://www.latex-project.org/lppl.txt for details.
+%%
+%%
+%% ====
+% Show page(s) 1
+%%
+%%
+\documentclass[]{exaarticle}
+\pagestyle{empty}
+\setlength\textwidth{352.81416pt}
+\textwidth=320pt
+%StartShownPreambleCommands
+\usepackage{luacode,libertine}
+\begin{luacode*}
+function active_hyphen (head)
+ local orig_head = head
+ while head do
+ if head.id == 37 then
+ head.subtype = 1
+ if head.char == 45 then
+ local p = node.new("penalty")
+ p.penalty = 10000
+ local g = node.new("glue")
+ g.spec = node.new("glue_spec")
+ g.spec.width = 0
+ head.prev.next = p
+ p.next = head
+ p.prev = head.prev
+ g.prev = head
+ g.next = head.next
+ head.prev = p
+ head.next = g
+ g.next.prev = g
+ end
+ end
+ head = head.next
+ end
+ lang.hyphenate(orig_head) -- Trennungen neu testen
+ return true
+end
+\end{luacode*}
+%StopShownPreambleCommands
+\begin{document}
+\noindent\rule{\linewidth}{0.5pt}\makebox(0,0){\put(0,-200){\line(0,1){100}}}
+\par
+Finally, all of the three antibiotics examined had a negative effect on
+$\beta$-galactosidase activity from the time they were introduced to the
+assay. \par
+\directlua{luatexbase.add_to_callback("pre_linebreak_filter",active_hyphen,"hyphen")}
+Finally, all of the three antibiotics examined had a negative effect on
+$\beta$-galactosidase activity from the time they were introduced to the
+assay.\par
+\directlua{luatexbase.remove_from_callback("pre_linebreak_filter","hyphen")}
+Finally, all of the three antibiotics examined had a negative effect on
+$\beta$-galactosidase activity from the time they were introduced to the
+assay.
+\end{document}