--- coreutils-5.2.1/src/install.c.orig	2004-12-12 18:06:29.000000000 -0200
+++ coreutils-5.2.1/src/install.c	2004-12-12 18:36:11.000000000 -0200
@@ -19,6 +19,7 @@
 
 #include <config.h>
 #include <stdio.h>
+#include <stdlib.h>
 #include <getopt.h>
 #include <sys/types.h>
 #include <pwd.h>
@@ -515,6 +516,7 @@
 strip (const char *path)
 {
   int status;
+  char *strip_cmd;
   pid_t pid = fork ();
 
   switch (pid)
@@ -523,7 +525,10 @@
       error (EXIT_FAILURE, errno, _("fork system call failed"));
       break;
     case 0:			/* Child. */
-      execlp ("strip", "strip", path, NULL);
+      strip_cmd = getenv("STRIP");
+      if (! strip_cmd)
+        strip_cmd = "strip";
+      execlp (strip_cmd, strip_cmd, path, NULL);
       error (EXIT_FAILURE, errno, _("cannot run strip"));
       break;
     default:			/* Parent. */