make find accept -type p for FIFOs

also -type s but never match

diff --git a/commands/simple/find.c b/commands/simple/find.c
index a478452c3c3a9b34a2c8b3fabdff3e7589d4a499..d0072c7ed19c2fe4436bb6abae99109f6eb93684 100755 (executable)
--- a/commands/simple/find.c
+++ b/commands/simple/find.c
@@ -673,6 +673,12 @@ int t;
          case 'f':
                p->n_info.n_int.n_val = S_IFREG;
                break;
+         case 'p':
+               p->n_info.n_int.n_val = S_IFIFO;
+               break;
+         case 's':
+               p->n_info.n_int.n_val = ~0;
+               break;
          case 'l':
 #ifdef S_IFLNK
                p->n_info.n_int.n_val = S_IFLNK;
@@ -681,7 +687,7 @@ int t;
 #endif
                break;
          default:
-               fatal("-type needs b, c, d, f or l", "");
+               fatal("-type needs b, c, d, f, p, s or l", "");
        }
        break;
     case OP_USER: