[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Groff] Re: YaDCM (Yet another Drop Capital Macro)
From: |
Werner LEMBERG |
Subject: |
[Groff] Re: YaDCM (Yet another Drop Capital Macro) |
Date: |
Fri, 18 Mar 2005 10:20:19 +0100 (CET) |
> Yes thanks Werner and in return I offer `Yet another Drop Capital
> Macro'.
*Very* nice! This may be something for mom...
Below a patch for it.
Werner
======================================================================
--- dropcap.tmac.orig 2005-03-18 10:17:24.263842176 +0100
+++ dropcap.tmac 2005-03-18 10:17:24.263842176 +0100
@@ -107,13 +107,13 @@
. nr dc::linesindex \\n[dc::linesm1]
. ds dc::font \\$4
. ds dc::family \\$5
-. nr dc::adjustment (\\$6;u)
-. nr dc::lastadjust (\\$6;u)
+. nr dc::adjustment (u;\\$6)
+. nr dc::lastadjust (u;\\$6)
. shift 5
. while \\n[dc::linesindex]>0 \{\
. nr dc::adjustarray\\n[dc::linesindex] 0
. ie \\n[.$]>0 \{\
-. nr dc::lastadjust (\\$1;u)
+. nr dc::lastadjust (u;\\$1)
. nr dc::adjustarray\\n[dc::linesindex] \\n[dc::lastadjust]
. shift
. \}