--- doc/loncapafiles/wrap_setuid.piml	2005/07/08 01:31:08	1.1
+++ doc/loncapafiles/wrap_setuid.piml	2012/10/05 15:36:22	1.19
@@ -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.19 2012/10/05 15:36: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">
+<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 suse12.2 fedora14 fedora15 fedora16 fedora17 ubuntu12">
 
 $fslist='<TARGET />';
 open(FIND,  "find <TARGET /> -xdev -type f \\( -perm -04000 -o -perm -02000 \\) -print|");