From 3c59753b94d0425e7ddcc4b57b11dfb283d0c144 Mon Sep 17 00:00:00 2001
From: "Jeffrey H. Kingston" <jeff@it.usyd.edu.au>
Date: Tue, 14 Sep 2010 20:41:31 +0000
Subject: Lout 3.36.

git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@41 9365b830-b601-4143-9ba8-b4a8e2c3339c
---
 include/dsf | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'include/dsf')

diff --git a/include/dsf b/include/dsf
index dc757a1..ae05e7d 100644
--- a/include/dsf
+++ b/include/dsf
@@ -5189,7 +5189,13 @@ def @DocumentSetup
 	def @LongNum
 	{
 	    numbers @Then {
-		initiallanguage @Language { word @NumSep @ShortNum }
+		# initiallanguage @Language { word @NumSep @ShortNum }
+		@ShortNum @Case {
+                  ""   @Yield { } # numberless: don't produce `word'
+                  else @Yield {
+                    initiallanguage @Language { word @NumSep @ShortNum }
+                  }
+               }
 	    }
 	}
 
-- 
cgit