fix bug in selecting S(pecial) font.
[unix-history] / usr / src / local / ditroff / ditroff.old.okeeffe / troff / t6.c
index 34560c0..615f75f 100644 (file)
@@ -1,4 +1,4 @@
-/*     t6.c    1.4     (Berkeley)      83/11/09        */
+/*     t6.c    1.5     (Berkeley)      83/11/28        */
 #include "tdef.h"
 extern
 #include "d.h"
 #include "tdef.h"
 extern
 #include "d.h"
@@ -352,7 +352,7 @@ int a;
                j = font1;
                goto s0;
        }
                j = font1;
                goto s0;
        }
-       if (i == 'S' || i == '0')
+       if (i == '0')
                return;
        if ((j = findft(i)) == -1)
                if ((j = setfp(0, i)) == -1)    /* try to put it in position 0 */
                return;
        if ((j = findft(i)) == -1)
                if ((j = setfp(0, i)) == -1)    /* try to put it in position 0 */