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

Diff for /loncom/homework/hint.pm between versions 1.30 and 1.34

version 1.30, 2002/10/28 23:31:48 version 1.34, 2003/02/07 22:03:21
Line 7 Line 7
 #  #
 # This file is part of the LearningOnline Network with CAPA (LON-CAPA).  # This file is part of the LearningOnline Network with CAPA (LON-CAPA).
 #  #
 # LON-CAPA is free software; you can redistribute it and/or modify  # LON-CAPA me&aree software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by  # it under the terms of the GNU General Public License as published by
 # the Free Software Foundation; either version 2 of the License, or  # the Free Software Foundation; either version 2 of the License, or
 # (at your option) any later version.  # (at your option) any later version.
Line 56  sub start_hintgroup { Line 56  sub start_hintgroup {
       if ($target eq 'web') {$result='<table bgcolor="#dddddd"><tr><td>';}        if ($target eq 'web') {$result='<table bgcolor="#dddddd"><tr><td>';}
     }      }
     if ($skiptoend) {      if ($skiptoend) {
       &Apache::lonxml::get_all_text("/hintgroup",$$parser[$#$parser]);        &Apache::lonxml::get_all_text("/hintgroup",$parser);
     }      }
   } elsif ($target eq 'tex') {    } elsif ($target eq 'tex') {
     $result .= '\keephidden{';       $result .= '\keephidden{'; 
Line 123  sub start_numericalhint { Line 123  sub start_numericalhint {
       $result  = &Apache::edit::rebuild_tag($token);        $result  = &Apache::edit::rebuild_tag($token);
       $result .= &Apache::edit::handle_insert();        $result .= &Apache::edit::handle_insert();
     }      }
     } elsif ($target eq 'web') {
         &Apache::response::reset_params();
   }    }
   return $result;    return $result;
 }  }
Line 131  sub end_numericalhint { Line 133  sub end_numericalhint {
   my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;    my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;
   my $result;    my $result;
   if ($target eq 'web') {    if ($target eq 'web') {
       if (!$Apache::lonxml::default_homework_loaded) {
    &Apache::lonxml::default_homework_load($safeeval);
       }
     $safeeval->share_from('capa',['&caparesponse_capa_check_answer']);      $safeeval->share_from('capa',['&caparesponse_capa_check_answer']);
     my $name= &Apache::lonxml::get_param('name',$parstack,$safeeval);      my $name= &Apache::lonxml::get_param('name',$parstack,$safeeval);
     &Apache::response::setup_params('numericalhint');      &Apache::response::setup_params('numericalhint');
Line 211  sub start_hintpart { Line 216  sub start_hintpart {
       foreach $which (@Apache::hint::which) { if ($which eq $on) { $show = 1; last } }        foreach $which (@Apache::hint::which) { if ($which eq $on) { $show = 1; last } }
     }      }
     if (!$show) {      if (!$show) {
       &Apache::lonxml::get_all_text("/hintpart",$$parser[$#$parser]);        &Apache::lonxml::get_all_text("/hintpart",$parser);
     }      }
   } elsif ($target eq 'grade') {    } elsif ($target eq 'grade') {
     &Apache::lonxml::get_all_text("/hintpart",$$parser[$#$parser]);      &Apache::lonxml::get_all_text("/hintpart",$parser);
   } elsif ($target eq 'edit') {    } elsif ($target eq 'edit') {
     $result.= &Apache::edit::tag_start($target,$token);      $result.= &Apache::edit::tag_start($target,$token);
     $result.= &Apache::edit::text_arg('On:','on',$token);      $result.= &Apache::edit::text_arg('On:','on',$token);
Line 338  sub start_radiobuttonhint { Line 343  sub start_radiobuttonhint {
     return $result;      return $result;
 }  }
   
 sp;&end_radiobuttonhint {  sub end_radiobuttonhint {
     my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;      my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
     my $result;      my $result;
     if ($target eq 'web') {      if ($target eq 'web') {
Removed from v.1.30  
changed lines
  Added in v.1.34

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