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

Diff for /loncom/interface/lonfeedback.pm between versions 1.363 and 1.364

version 1.363, 2013/01/03 20:51:23 version 1.364, 2013/01/18 13:22:26
Line 4423  ENDREDIR Line 4423  ENDREDIR
                                                 $cdom,$cnum);                                                  $cdom,$cnum);
           $contrib{'deleted'} =~ s/^\.//;            $contrib{'deleted'} =~ s/^\.//;
           $contrib{'deleted'} =~ s/\.$//;            $contrib{'deleted'} =~ s/\.$//;
             my $confirm_msg = '';
           if ($contrib{'deleted'} ne '') {            if ($contrib{'deleted'} ne '') {
               if (&Apache::lonnet::store({'deleted' => ''},$symb,$env{'request.course.id'},                if (&Apache::lonnet::store({'deleted' => ''},$symb,$env{'request.course.id'},
                                           $cdom,$cnum) eq 'ok') {                                            $cdom,$cnum) eq 'ok') {
Line 4450  ENDREDIR Line 4451  ENDREDIR
                                             $uname,$udom,$env{'request.course.id'},                                              $uname,$udom,$env{'request.course.id'},
                                             'undelete');                                              'undelete');
                   }                    }
                   $r->print(&Apache::lonhtmlcommon::confirm_success(&mt("Undeleted all entries")));                    $confirm_msg .= &Apache::lonhtmlcommon::confirm_success(&mt("Undeleted all entries"));
               } else {                } else {
                   $r->print(&Apache::lonhtmlcommon::confirm_success(&mt("Failed to undelete entries"),1));                    $confirm_msg .= &Apache::lonhtmlcommon::confirm_success(&mt("Failed to undelete entries"),1);
               }                }
           } else {            } else {
               $r->print(&Apache::lonhtmlcommon::confirm_success(&mt("No entries to undelete"),1));                $confirm_msg .= &Apache::lonhtmlcommon::confirm_success(&mt("No entries to undelete"),1);
           }            }
           $r->print("<br /><a href='$feedurl'>".&mt("Return and reload")."</a>");            $r->print(
                 '<br />'
                .&Apache::loncommon::confirmwrapper($confirm_msg)
                .&Apache::lonhtmlcommon::actionbox(
                     ["<a href='$feedurl'>".&mt("Return and reload")."</a>"])
             );
       }        }
       $r->print(&Apache::loncommon::end_page());        $r->print(&Apache::loncommon::end_page());
       return OK;        return OK;
Removed from v.1.363  
changed lines
  Added in v.1.364

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