Subversion Repositories SvarDOS

Rev

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

Rev 757 Rev 995
Line 112... Line 112...
112 
    puts(svarlang_str(3, 24)); /* "ERROR: package name too long" */
 112 
    puts(svarlang_str(3, 24)); /* "ERROR: package name too long" */
113 
    return(1);
 113 
    return(1);
114 
  }
 114 
  }
115 
  memcpy(pkgname, file + lastpathdelim + 1, t);
 115 
  memcpy(pkgname, file + lastpathdelim + 1, t);
116 
  pkgname[t] = 0;
 116 
  pkgname[t] = 0;
117 
  strtolower(pkgname); /* package name must be all lower-case for further file matching in the zip file */
 117 
  strlwr(pkgname); /* package name must be all lower-case for further file matching in the zip file */
118 
  /* prepare the zip file and install it */
 118 
  /* prepare the zip file and install it */
119 
  zipfileidx = pkginstall_preparepackage(pkgname, file, flags, &zipfilefd, dosdir, dirlist);
 119 
  zipfileidx = pkginstall_preparepackage(pkgname, file, flags, &zipfilefd, dosdir, dirlist);
120 
  if (zipfileidx != NULL) {
 120 
  if (zipfileidx != NULL) {
121 
    /* remove the old version of the package if we are UPDATING it */
 121 
    /* remove the old version of the package if we are UPDATING it */
122 
    res = 0;
 122 
    res = 0;