Subversion Repositories SvarDOS

Rev

Rev 261 | Rev 265 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 261 Rev 264
Line 95... Line 95...
95
      case '.':
95
      case '.':
96
        lastdot = t;
96
        lastdot = t;
97
        break;
97
        break;
98
    }
98
    }
99
  }
99
  }
100
  if (lastdot < lastpathdelim) lastdot = t; /* a dot before last path delimiters is not an extension prefix */
100
  if (lastdot <= lastpathdelim) lastdot = t; /* a dot before last path delimiters is not an extension prefix */
101
  t = lastdot - (lastpathdelim + 1);
101
  t = lastdot - (lastpathdelim + 1);
102
  if (t + 1 > sizeof(pkgname)) {
102
  if (t + 1 > sizeof(pkgname)) {
103
    kitten_puts(3, 24, "ERROR: package name too long");
103
    kitten_puts(3, 24, "ERROR: package name too long");
104
    return(1);
104
    return(1);
105
  }
105
  }