--- doc/loncapafiles/wrap_setuid.piml	2005/07/08 01:31:08	1.1
+++ doc/loncapafiles/wrap_setuid.piml	2006/09/15 21:02:56	1.4
@@ -3,7 +3,7 @@
 <!-- wrap_setuid.piml -->
 <!-- Guy Albertelli -->
 
-<!-- $Id: wrap_setuid.piml,v 1.1 2005/07/08 01:31:08 albertel Exp $ -->
+<!-- $Id: wrap_setuid.piml,v 1.4 2006/09/15 21:02:56 raeburn Exp $ -->
 
 <!--
 
@@ -35,9 +35,9 @@ http://www.lon-capa.org/
 <file>
 <target dist="default">/home/httpd/perl</target>
 <perlscript mode="fg" dist="default">
-print("Not wrapping setuid scripts\n");
+#print("Not wrapping setuid scripts\n");
 </perlscript>
-<perlscript mode="fg" dist="suse9.2">
+<perlscript mode="fg" dist="suse9.2 suse9.3 sles9 sles10">
 
 $fslist='<TARGET />';
 open(FIND,  "find <TARGET /> -xdev -type f \\( -perm -04000 -o -perm -02000 \\) -print|");