test/zh/warichu-test: an example in LaTeX

Note that the last update of ltj-warichu.sty is 2012-04-06,
and the commit message of it says
>  It is a simple package of warichu that should modified in the future.
>  The code is brrowed from the website: http://code.google.com/p/xeguji/ .

warichu-test_ltx.tex should be typeset without an error, but the result is
unsatisfactory. Perhaps reconstitution from scratch is a better option.

diff --git a/test/zh/warichu-test/ltj-warichu.sty b/test/zh/warichu-test/ltj-warichu.sty
index 46434cc..16546b3 100644 (file)
--- a/test/zh/warichu-test/ltj-warichu.sty
+++ b/test/zh/warichu-test/ltj-warichu.sty
@@ -156,6 +156,7 @@
 \guji@everycommand={\parindent=2em\indent}
 \def\guji{%
   \begingroup
+  \ifdefined\eh@everypar\let\everypar\eh@everypar\fi% temporary disable everyhook package
   \everypar{\guji@iterate}%
   \everyvbox{\everypar{}}%
   \guji@hsize=\hsize
@@ -558,7 +559,7 @@
               \unhbox\guji@tmpbox
             \else
               \advance\guji@hoffset by \wd\guji@tmpbox
-              \unhbox\guji@tmpbox
+              \unhbox\guji@tmpbox\relax
             \fi
           \fi
         \fi

diff --git a/test/zh/warichu-test/warichu-test.pdf b/test/zh/warichu-test/warichu-test.pdf
index 8e4ae2a..41f435f 100644 (file)
Binary files a/test/zh/warichu-test/warichu-test.pdf and b/test/zh/warichu-test/warichu-test.pdf differ

diff --git a/test/zh/warichu-test/warichu-test.tex b/test/zh/warichu-test/warichu-test.tex
index 415363f..6d4f7d1 100644 (file)
--- a/test/zh/warichu-test/warichu-test.tex
+++ b/test/zh/warichu-test/warichu-test.tex
@@ -1,8 +1,8 @@
 \input luatexja-core.sty
 \showboxbreadth=999
 \showboxdepth=999
-\jfont\Song={name:NSimSun:jfm=ujis} at 16pt
-\jfont\smallSong={name:NSimSun:jfm=ujis} at 7pt
+\jfont\Song={name:HanaMinA:jfm=ujis} at 16pt
+\jfont\smallSong={name:HanaMinA:jfm=ujis} at 7pt
 \input ltj-warichu.sty
 \input ltj-warichufnt.sty
 \zmh@depth=8pt
@@ -13,7 +13,6 @@
 
 \guji
 
-\vskip 5pt
 
 陳仲舉言爲士則，行爲世範，登車攬轡，有澄清天下之志。|{汝南先賢傳曰：「陳蕃字仲舉，汝南平輿人。有室，荒蕪不埽除，曰：『大丈夫當爲國家埽天下。』值漢桓之末，閹豎用事，外戚豪橫。及拜太傅，與大將軍竇武謀誅宦官，反爲所害。」}爲豫章太守，|{海內先賢傳曰：「蕃爲尚書，以忠正忤貴戚，不得在臺，遷豫章太守。」}至，便問徐孺子所在，欲先看之。|{謝承後漢書曰：「徐穉字孺子，豫章南昌人。清妙高跱，超世絕俗。前後爲諸公所辟，雖不就，及其死，萬里赴弔。常豫炙雞一隻，以綿漬酒中，㬥乾以裹雞，徑到所赴冢隧外，以水漬綿，斗米飯，白茅爲藉，以雞置前。酹酒畢，留謁即去，不見喪主。」}主簿白：「羣情欲府君先入廨。」陳曰：「武王式商容之閭，席不暇煗。|{許叔重曰：「商容，殷之賢人，老子師也。」車上跽曰式。}吾之禮賢，有何不可！」|{袁宏漢紀曰：「蕃在豫章，爲穉獨設⼀榻，去則懸之，見禮如此。」}
 \endguji

diff --git a/test/zh/warichu-test/warichu-test_ltx.pdf b/test/zh/warichu-test/warichu-test_ltx.pdf
new file mode 100644 (file)
index 0000000..2f91a52
Binary files /dev/null and b/test/zh/warichu-test/warichu-test_ltx.pdf differ

diff --git a/test/zh/warichu-test/warichu-test_ltx.tex b/test/zh/warichu-test/warichu-test_ltx.tex
new file mode 100644 (file)
index 0000000..0bc485a
--- /dev/null
+++ b/test/zh/warichu-test/warichu-test_ltx.tex
@@ -0,0 +1,20 @@
+\documentclass{article}
+\usepackage{luatexja,ltj-warichu,ltj-warichufnt}
+\showboxbreadth=999
+\showboxdepth=999
+\jfont\Song={name:HanaMinA:jfm=ujis} at 16pt
+\jfont\smallSong={name:HanaMinA:jfm=ujis} at 7pt
+\makeatletter
+\zmh@depth=8pt
+\guji@everytwolinemode={\smallSong\baselineskip=8pt\zmh@depth=4pt}
+\guji@twolineraise=0pt
+\begin{document}
+\Song
+
+\guji
+
+
+陳仲舉言爲士則，行爲世範，登車攬轡，有澄清天下之志。|{汝南先賢傳曰：「陳蕃字仲舉，汝南平輿人。有室，荒蕪不埽除，曰：『大丈夫當爲國家埽天下。』值漢桓之末，閹豎用事，外戚豪橫。及拜太傅，與大將軍竇武謀誅宦官，反爲所害。」}爲豫章太守，|{海內先賢傳曰：「蕃爲尚書，以忠正忤貴戚，不得在臺，遷豫章太守。」}至，便問徐孺子所在，欲先看之。|{謝承後漢書曰：「徐穉字孺子，豫章南昌人。清妙高跱，超世絕俗。前後爲諸公所辟，雖不就，及其死，萬里赴弔。常豫炙雞一隻，以綿漬酒中，㬥乾以裹雞，徑到所赴冢隧外，以水漬綿，斗米飯，白茅爲藉，以雞置前。酹酒畢，留謁即去，不見喪主。」}主簿白：「羣情欲府君先入廨。」陳曰：「武王式商容之閭，席不暇煗。|{許叔重曰：「商容，殷之賢人，老子師也。」車上跽曰式。}吾之禮賢，有何不可！」|{袁宏漢紀曰：「蕃在豫章，爲穉獨設⼀榻，去則懸之，見禮如此。」}
+\endguji
+\end{document}
+