--- doc/loncapafiles/wrap_setuid.piml	2005/09/07 21:34:19	1.2
+++ doc/loncapafiles/wrap_setuid.piml	2012/07/30 01:37:22	1.18
@@ -3,7 +3,7 @@
 <!-- wrap_setuid.piml -->
 <!-- Guy Albertelli -->
 
-<!-- $Id: wrap_setuid.piml,v 1.2 2005/09/07 21:34:19 raeburn Exp $ -->
+<!-- $Id: wrap_setuid.piml,v 1.18 2012/07/30 01:37:22 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 suse9.3 sles9">
+<perlscript mode="fg" dist="suse9.2 suse9.3 sles9 sles10 sles11 suse10.1 suse10.2 suse10.3 suse11.1 suse11.2 suse11.3 suse11.4 suse12.1 fedora14 fedora15 fedora16 fedora17 ubuntu12">
 
 $fslist='<TARGET />';
 open(FIND,  "find <TARGET /> -xdev -type f \\( -perm -04000 -o -perm -02000 \\) -print|");