imported 9.0.299 Beta 02
[ckermit.git] / ckuus4.c
index 35cfa5f..3e52fee 100644 (file)
--- a/ckuus4.c
+++ b/ckuus4.c
@@ -14866,7 +14866,7 @@ zzstring(s,s2,n) char *s; char **s2; int *n; {
                         int i;
                         for (i = 0; i < k-1; i++) {
                             if (vnambuf[i] == '[') {
-                               bprc = boundspair(vnambuf,":_",&x1,&x2,&c);
+                               bprc = boundspair(vnambuf,":_.",&x1,&x2,&c);
                                debug(F111,"zzstring boundspair",vnambuf,bprc);
                                debug(F000,"zzstring boundspair c","",c);
                                if (bprc > -1) {
@@ -14915,18 +14915,22 @@ zzstring(s,s2,n) char *s; char **s2; int *n; {
                                debug(F000,">>> c","",c);
                                 if ((q = malloc(k+1))) {
                                     strcpy(q,vp); /* safe */
+                                   if (c == '.') {
+                                       q[x1+1] = NUL;
+                                       debug(F000,"XXX. q",q,c);
+                                   }
                                    if (c == ':') { /* start:length */
                                        if ((x2 > -1) && ((x1 + x2) <= k)) {
                                            q[x1+x2] = NUL;
                                        }
-                                       debug(F000,"XXX q",q,c);
+                                       debug(F000,"XXX: q",q,c);
                                    } else if (c == '_') { /* start_endpos */
                                        if (x1 >= x2) {
                                            q[x1 = 0] = NUL;
                                        } else if (x2 < k && x2 > -1) {
                                            q[x2] = NUL;
                                        }
-                                       debug(F000,"XXX q",q,c);
+                                       debug(F000,"XXX_ q",q,c);
                                    }
                                    vp = q+x1;
                                 } else vp = NULL;