aboutsummaryrefslogtreecommitdiffstats
path: root/z42.c
diff options
context:
space:
mode:
authorJeffrey H. Kingston <jeff@it.usyd.edu.au>2010-09-14 20:37:45 +0000
committerJeffrey H. Kingston <jeff@it.usyd.edu.au>2010-09-14 20:37:45 +0000
commitc89f0bc2209f7f98695e6b94fbac316c84fbf9d4 (patch)
tree456d506bd18edd3b768eaffa8f70ae93565682e4 /z42.c
parent7db8921aac3a0e1223af269ec7092bdd91a7c7a2 (diff)
downloadlout-c89f0bc2209f7f98695e6b94fbac316c84fbf9d4.tar.gz
Lout 3.25.
git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@19 9365b830-b601-4143-9ba8-b4a8e2c3339c
Diffstat (limited to 'z42.c')
-rw-r--r--z42.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/z42.c b/z42.c
index 1365118..adbebc6 100644
--- a/z42.c
+++ b/z42.c
@@ -1,7 +1,7 @@
/*@z42.c:Colour Service:ColourChange, ColourCommand@**************************/
/* */
-/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.24) */
-/* COPYRIGHT (C) 1991, 2000 Jeffrey H. Kingston */
+/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.25) */
+/* COPYRIGHT (C) 1991, 2001 Jeffrey H. Kingston */
/* */
/* Jeffrey H. Kingston (jeff@cs.usyd.edu.au) */
/* Basser Department of Computer Science */
@@ -193,7 +193,7 @@ void ColourChange(STYLE *style, OBJECT x)
return;
}
- /* if argument is empty, fail and exit */
+ /* *** allowing empty left parameter now, means nochange
if( StringEqual(string(x), STR_EMPTY) )
{ if( BackEnd->colour_avail )
Error(42, 4, "%s ignored (empty left parameter)", WARN, &fpos(x),
@@ -201,9 +201,11 @@ void ColourChange(STYLE *style, OBJECT x)
debug0(DCO, D, "ColourChange returning (colour unchanged)");
return;
}
+ *** */
/* if argument is nochange, do nothing */
- if( StringEqual(string(x), STR_COLOUR_NOCHANGE) )
+ if( StringEqual(string(x), STR_COLOUR_NOCHANGE) ||
+ StringEqual(string(x), STR_EMPTY) )
{ debug0(DCO, D, "ColourChange returning (colour nochange)");
return;
}