Diff for /loncom/interface/lonpopulate.pm between versions 1.39 and 1.40

version 1.39, 2006/02/09 13:45:54 version 1.40, 2006/02/10 02:59:02
Line 1029  Note: Any students previously added manu Line 1029  Note: Any students previously added manu
       if ($enrollvar{'showphoto'}) {        if ($enrollvar{'showphoto'}) {
           my ($update,$commentary) = &Apache::lonnet::auto_photochoice($crs,            my ($update,$commentary) = &Apache::lonnet::auto_photochoice($crs,
        $dom);         $dom);
           $r->print('<br />'.$commentary.'<br /><br />            if ($update) { 
                 $r->print('<br />'.$commentary.'<br /><br />
 <form name="photoupdate" method="post">  <form name="photoupdate" method="post">
 <input type ="button" name="retrieve" value="'.&mt('Update photo repository').'"  <input type ="button" name="retrieve" value="'.&mt('Update photo repository').'"
 onclick="javascript:document.photoupdate.submit()" />  onclick="javascript:document.photoupdate.submit()" />
 <input type ="hidden" name="action" value="'.$action.'" />  <input type ="hidden" name="action" value="'.$action.'" />
 <input type ="hidden" name="state" value="process" />  <input type ="hidden" name="state" value="process" />
 </form>');  </form>');
             } else {
                 $r->print(&mt('Update of photos via the Automated Enrollment Manager is unavailable in this domain.').'<br /><br /><input type="button" name=mainmenu" value="Go back" onclick="javascript:history.go(-1);" />');
             }
       } else {        } else {
           $r->print('Update of photos is unavailable, as import of student photos is currently disabled.<br />Enable this first via: <a href="/adm/populate?action=photos">'.$$tasktitleref{'photos'}.'</a>');            $r->print('Update of photos is unavailable, as import of student photos is currently disabled.<br />Enable this first via: <a href="/adm/populate?action=photos">'.$$tasktitleref{'photos'}.'</a>');
       }        }

Removed from v.1.39  
changed lines
  Added in v.1.40


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