rdh@THUMPER.BELLCORE.COM (Ralph Hill) (03/23/91)
Previous message contains the wrong diff....
15d14
< #include <environ.ih>
769c768,775
< char *t, *t2, *s = environ_GetProfile("ltextindents");
---
> addindent("defun", 2);
> addindent("defmacro", 2);
> addindent("defconstant", 1);
> addindent("defstruct", 1);
> addindent("let", 1);
> addindent("let*", 1);
> addindent("do", 2);
> addindent("if", 1);
771,778d776
< if (!s) s =
"defun:2,defmacro:2,defconstant:1,defstruct:1,let:1,let*:1,do:2,if:1";
< while (isspace(*s)) ++s;
< while (t = s) {
< if (s = index(t, ',')) *s++ = NULL;
< if (t2=index(t, ':')) *t2++=NULL;
< addindent(t, t2 ? atoi(t2) : 1);
< }
<