lha-ext.patch

   1 --- lha-114e/src/lharc.c.ext    Wed Jan 15 10:49:30 1997
   2 +++ lha-114e/src/lharc.c        Mon Jun 28 12:37:40 1999
   3 @@ -963,6 +963,7 @@
   4         }
   5         if (p = (char *) rindex(archive_name, '.')) {
   6                 if (strucmp(".LZH", p) == 0
   7 +                   || strucmp(".LHA", p) == 0  /* Amiga */
   8                     || strucmp(".LZS", p) == 0
   9                     || strucmp(".COM", p) == 0  /* DOS SFX */
  10                     || strucmp(".EXE", p) == 0
  11 @@ -975,6 +976,11 @@
  12
  13         if (open_old_archive_1(archive_name, &fp))
  14                 return fp;
  15 +       sprintf(expanded_archive_name, "%s%s", archive_name, ARCHIVENAME_EXTENTION);
  16 +       if (open_old_archive_1(expanded_archive_name, &fp)) {
  17 +               archive_name = expanded_archive_name;
  18 +               return fp;
  19 +       }
  20         sprintf(expanded_archive_name, "%s.lzh", archive_name);
  21         if (open_old_archive_1(expanded_archive_name, &fp)) {
  22                 archive_name = expanded_archive_name;