Subversion Repositories SvarDOS

Rev

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

Rev 1600 Rev 1601
Line 116... Line 116...
116 
  strcpy(fname, zipfile);
 116 
  strcpy(fname, zipfile);
117 
 
 117 
 
118 
  /* append an .SVP extension if not present */
 118 
  /* append an .SVP extension if not present */
119 
  {
 119 
  {
120 
    int slen = strlen(fname);
 120 
    int slen = strlen(fname);
121 
    if ((slen > 3) && (fname[slen - 4] != '.')) strcat(fname, ".SVP");
 121 
    if ((slen < 4) || (fname[slen - 4] != '.')) strcat(fname, ".SVP");
122 
  }
 122 
  }
123 
 
 123 
 
124 
  /* Now let's check the content of the zip file */
 124 
  /* Now let's check the content of the zip file */
125 
 
 125 
 
126 
  *zipfd = fopen(fname, "rb");
 126 
  *zipfd = fopen(fname, "rb");