Subversion Repositories SvarDOS

Rev

Rev 1972 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1972 Rev 1979
Line 43... Line 43...
43 
 
 43 
 
44 
    if (filterstr != NULL) {
 44 
    if (filterstr != NULL) {
45 
      if (fdnpkg_strcasestr(ep->d_name, filterstr) == NULL) continue; /* skip if not matching the non-NULL filter */
 45 
      if (fdnpkg_strcasestr(ep->d_name, filterstr) == NULL) continue; /* skip if not matching the non-NULL filter */
46 
    }
 46 
    }
47 
 
 47 
 
- 
 
 48 
    output(ep->d_name);
- 
 
 49 
 
48 
    /* load the metadata from %DOSDIR\APPINFO\*.lsm */
 50 
    /* load the metadata from %DOSDIR\APPINFO\*.lsm */
49 
    sprintf(buff, "%s\\appinfo\\%s.lsm", dosdir, ep->d_name);
 51 
    sprintf(buff, "%s\\appinfo\\%s.lsm", dosdir, ep->d_name);
50 
    readlsm(buff, "version", ver, sizeof(ver));
 52 
    readlsm(buff, "version", ver, sizeof(ver));
51 
    readlsm(buff, "description", buff, 80 - 2 - strlen(ver) - strlen(ep->d_name));
 - 
 
52 
 
 53 
 
53 
    output(ep->d_name);
 - 
 
54 
    output(" ");
 54 
    output(" ");
55 
    output(ver);
 55 
    output(ver);
- 
 
 56 
 
- 
 
 57 
    {
- 
 
 58 
      unsigned short l = strlen(ver) + strlen(ep->d_name);
- 
 
 59 
      readlsm(buff, "description", buff+1, 62);
56 
    output(" ");
 60 
      buff[0] = ' ';
- 
 
 61 
      while (l++ < 16) output(" ");
57 
    outputnl(buff);
 62 
      outputnl(buff);
- 
 
 63 
    }
- 
 
 64 
 
58 
    matchfound = 1;
 65 
    matchfound = 1;
59 
  }
 66 
  }
60 
  if (matchfound == 0) outputnl(svarlang_str(5, 0)); /* "No package matched the search." */
 67 
  if (matchfound == 0) outputnl(svarlang_str(5, 0)); /* "No package matched the search." */
61 
 
 68 
 
62 
  closedir(dp);
 69 
  closedir(dp);