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

Diff for /loncom/interface/lonfeedback.pm between versions 1.353 and 1.354

version 1.353, 2012/04/29 22:55:20 version 1.354, 2012/05/10 11:56:06
Line 1935  END Line 1935  END
       unless (&contains_block_html($quote)) {        unless (&contains_block_html($quote)) {
           &newline_to_br(\$quote);            &newline_to_br(\$quote);
       }        }
       $quote='<blockquote>'.&Apache::lontexconvert::msgtexconverted($quote).'</blockquote>';          $quote=&Apache::lonhtmlcommon::start_pick_box().
                  &Apache::lonhtmlcommon::row_title(&mt('Quote')).
                  &Apache::lontexconvert::msgtexconverted($quote).
                  &Apache::lonhtmlcommon::row_closure(1).
                  &Apache::lonhtmlcommon::end_pick_box();
   }    }
   my $header='';    my $header='';
   unless ($env{'form.modal'}) {    unless ($env{'form.modal'}) {
Line 1963  END Line 1967  END
   }    }
   $r->print(<<END);    $r->print(<<END);
 $options  $options
   <br>
   END
   $r->print(&Apache::lonhtmlcommon::start_pick_box());
   $r->print(<<END);
 $quote  $quote
 <p>  <p>
 $textareaheader  $textareaheader
 </p>  </p>
 <br>  
 <p>  <p>
 $latexHelp  $latexHelp
 </p>  </p>
 <p>  <p>
 END  END
   
     $r->print(&Apache::lonhtmlcommon::start_pick_box());      
     $r->print(&Apache::lonhtmlcommon::row_title(&mt('Subject')));      $r->print(&Apache::lonhtmlcommon::row_title(&mt('Subject')));
     $r->print('<input type="text" name="subject" size="30" value="'.      $r->print('<input type="text" name="subject" size="30" value="'.
               $subject.'" /></p>');                $subject.'" /></p>');
Line 2018  END Line 2025  END
         $r->print('<input type="hidden" name="ref" value="'.$env{'form.ref'}.'" />');          $r->print('<input type="hidden" name="ref" value="'.$env{'form.ref'}.'" />');
     }      }
     $r->print(<<END);      $r->print(<<END);
 <p>  
 <input type="hidden" name="sendit" value="1" />  <input type="hidden" name="sendit" value="1" />
 <input type="button" value="$send" onclick='gosubmit();' />  <input type="button" value="$send" onclick='gosubmit();' />
 </p>  
 </form>  </form>
 END  END
     if ($env{'form.editdisc'} || $env{'form.replydisc'}) {      if ($env{'form.editdisc'} || $env{'form.replydisc'}) {
Line 2036  END Line 2041  END
             $attachnum += @currnewattach;              $attachnum += @currnewattach;
         }          }
         my $blockblog = &Apache::loncommon::blocking_status('blogs');          my $blockblog = &Apache::loncommon::blocking_status('blogs');
         $r->print(&generate_attachments_button($postidx,$attachnum,$ressymb,$now,\@currnewattach,\@currdelold,$numoldver,'',$blockblog));  
         if ($attachnum > 0) {          if ($attachnum > 0) {
             if (@currnewattach > 0) {              if (@currnewattach > 0) {
                 $newattachmsg .= '<br /><b>'.&mt('New attachments').'</b><br />';                  $newattachmsg .= '<br /><b>'.&mt('New attachments').'</b><br />';
Line 2056  END Line 2060  END
                 $r->print("<br /><b>$lt{'reta'}</b>:$attachmsg<br />\n");                  $r->print("<br /><b>$lt{'reta'}</b>:$attachmsg<br />\n");
             }              }
             if ($newattachmsg) {              if ($newattachmsg) {
                 $r->print("$newattachmsg<br />");                  $r->print("$newattachmsg");
             }              }
         }          }
           $r->print(&generate_attachments_button($postidx,$attachnum,$ressymb,$now,\@currnewattach,\@currdelold,$numoldver,'',$blockblog));
     }      }
     $r->print(&generate_preview_button().      $r->print(&generate_preview_button().
       &Apache::loncommon::end_page());        &Apache::loncommon::end_page());
Line 3486  END Line 3491  END
 $start_page  $start_page
 $toolarge  $toolarge
 <form name="modattachments" method="post" enctype="multipart/form-data" action="/adm/feedback?attach=$symb">  <form name="modattachments" method="post" enctype="multipart/form-data" action="/adm/feedback?attach=$symb">
  <br />  
  <h1>$lt{'clic'}</h1>   <h1>$lt{'clic'}</h1>
 END  END
     $r->print(&Apache::lonhtmlcommon::start_pick_box());      $r->print(&Apache::lonhtmlcommon::start_pick_box());
Removed from v.1.353  
changed lines
  Added in v.1.354

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