dip-3.3.7o-andor.patch

   1 --- dip-3.3.7o/command.c.andor  Thu Apr 10 11:53:52 1997
   2 +++ dip-3.3.7o/command.c        Thu Apr 10 11:59:11 1997
   3 @@ -2714,17 +2714,16 @@
   4  #endif
   5
   6         if (
   7 -           (strcmp(argv[0], "if")    == 0)  &&
   8 -           (strcmp(argv[0], "goto")  == 0)  &&
   9 +           (strcmp(argv[0], "if")    == 0)  ||
  10 +           (strcmp(argv[0], "goto")  == 0)  ||
  11             (strcmp(argv[0], "print") == 0)
  12             )
  13           {
  14             errlevel_flag=0; /* don't modify errlevel value */
  15 +         } else {
  16 +           errlevel_flag=1; /* allow to modify errlevel with the new rc */
  17             errlevel  = 0; /* allow print of $errlvl after error detected */
  18           }
  19 -       else {
  20 -         errlevel_flag=1; /* allow to modify errlevel with the new rc */
  21 -       }
  22
  23         /* Now, check which command it is. */
  24         if (strcmp(argv[0], "exit") != 0) {