[BACK]Return to imsprocessor.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / imspackages

Diff for /loncom/imspackages/imsprocessor.pm between versions 1.48 and 1.49

version 1.48, 2009/08/17 03:52:09 version 1.49, 2011/10/24 23:41:52
Line 680  sub process_resinfo { Line 680  sub process_resinfo {
             }              }
             my $destresdir = $destdir;              my $destresdir = $destdir;
             if ($context eq 'CSTR') {              if ($context eq 'CSTR') {
                 $destresdir =~ s|/home/$uname/public_html/|/res/$udom/$uname/|;                  $destresdir =~ s|/home/httpd/html/priv/|/res/|;
             } elsif ($context eq 'DOCS') {              } elsif ($context eq 'DOCS') {
                 $destresdir =~ s|^/home/httpd/html/userfiles|/uploaded|;                  $destresdir =~ s|^/home/httpd/html/userfiles|/uploaded|;
             }              }
Line 3218  sub process_assessment { Line 3218  sub process_assessment {
     }      }
     my $destresdir = $destdir;      my $destresdir = $destdir;
     if ($context eq 'CSTR') {      if ($context eq 'CSTR') {
         $destresdir =~ s|/home/$uname/public_html/|/res/$udom/$uname/|;          $destresdir =~ s|/home/httpd/html/priv/|/res/|;
     } elsif ($context eq 'DOCS') {      } elsif ($context eq 'DOCS') {
         $destresdir =~ s|^/home/httpd/html/userfiles|/uploaded|;          $destresdir =~ s|^/home/httpd/html/userfiles|/uploaded|;
     }      }
Line 4980  sub process_content { Line 4980  sub process_content {
     my $xmlfile = $docroot.'/'.$res.".dat";      my $xmlfile = $docroot.'/'.$res.".dat";
     my $destresdir = $destdir;      my $destresdir = $destdir;
     if ($context eq 'CSTR') {      if ($context eq 'CSTR') {
         $destresdir =~ s|/home/$user/public_html/|/res/$dom/$user/|;          $destresdir =~ s|/home/httpd/html/priv/|/res/|;
     } elsif ($context eq 'DOCS') {      } elsif ($context eq 'DOCS') {
         $destresdir =~ s|^/home/httpd/html/userfiles|/uploaded|;          $destresdir =~ s|^/home/httpd/html/userfiles|/uploaded|;
     }      }
Removed from v.1.48  
changed lines
  Added in v.1.49

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>