--- loncom/homework/outputtags.pm 2009/11/01 16:10:35 1.56 +++ loncom/homework/outputtags.pm 2018/09/11 14:39:47 1.58.4.1 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # tags that create controlled output # -# $Id: outputtags.pm,v 1.56 2009/11/01 16:10:35 foxr Exp $ +# $Id: outputtags.pm,v 1.58.4.1 2018/09/11 14:39:47 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -78,8 +78,8 @@ sub substitute_simple_tags_latex { # restore the <>'s: - $string =~ s/\\ensuremath{<}/}/>/g; + $string =~ s/\\ensuremath\{<}/}/>/g; # Substitute the tags: @@ -171,7 +171,7 @@ sub start_displayduedate { # at the start of the line to ensure it won't overlap # the 1 col boundary. - $result = '\\\\ \framebox{' + $result = '\vspace{1.0 ex} \framebox{' .&mt('Due').' '.$duetext.'}'; } else { $result = &mt('Due') . ' '.$duetext; @@ -321,7 +321,7 @@ sub start_displaystudentphoto { my $response=$ua->request($request); if ($response->is_success) { my $file=$user."_".$domain."_studentphoto.eps"; - open(FILE,">".$Apache::lonnet::perlvar{'lonPrtDir'}."/$file"); + open(FILE,">",$Apache::lonnet::perlvar{'lonPrtDir'}."/$file"); print FILE $response->content; close(FILE); my $width_param=&Apache::londefdef::image_size($Apache::lonnet::perlvar{'lonPrtDir'}."/$file",'0.3',$parstack,$safeeval);