--- doc/loncapafiles/picins_check.piml	2011/02/27 18:54:59	1.11
+++ doc/loncapafiles/picins_check.piml	2012/07/30 01:37:22	1.17
@@ -3,7 +3,7 @@
 <!-- picins_check.piml -->
 <!-- Stuart Raeburn -->
 
-<!-- $Id: picins_check.piml,v 1.11 2011/02/27 18:54:59 raeburn Exp $ -->
+<!-- $Id: picins_check.piml,v 1.17 2012/07/30 01:37:22 raeburn Exp $ -->
 
 <!--
 
@@ -32,7 +32,7 @@ http://www.lon-capa.org/
 <piml>
 <files>
 <file>
-<perlscript mode="fg" dist="fedora9 fedora10 fedora11 fedora12 fedora13 fedora14 rhes6 sles11 suse11.1 suse11.2 suse11.3 suse11.4 debian5 debian6 ubuntu8 ubuntu10">
+<perlscript mode="fg" dist="fedora9 fedora10 fedora11 fedora12 fedora13 fedora14 fedora15 fedora16 fedora17 rhes6 scientific6 centos6 sles11 suse11.1 suse11.2 suse11.3 suse11.4 suse12.1 debian5 debian6 ubuntu8 ubuntu10 ubuntu12">
     my $picinspath = '/usr/share/texmf/tex/latex/picins'; 
     my $file = 'picins.sty';
     if (!-e "$picinspath/$file") {
@@ -47,8 +47,9 @@ http://www.lon-capa.org/
             }
         }
         if (-d $picinspath) {
-            system("/usr/bin/wget -O $picinspath/$file  http://www.ctan.org/get/macros/latex209/contrib/picins/picins.sty  1>/dev/null 2>/dev/null");
-            die("/usr/bin/wget -O  http://www.ctan.org/get/macros/latex209/contrib/picins/picins.sty failed") if $?;
+            my $srcurl = 'http://install.loncapa.org/ctan/tex-archive/macros/latex209/contrib/picins/picins.sty';
+            system("/usr/bin/wget -O $picinspath/$file $srcurl 1>/dev/null 2>/dev/null");
+            die("/usr/bin/wget -O $srcurl failed") if $?;
             if (-e $picinspath.'/'.$file) {
                 system('/usr/bin/texconfig rehash  1>/dev/null 2>/dev/null');
                 die("Can't run /usr/bin/texconfig rehash") if $?;