--- loncom/xml/londefdef.pm 2021/12/14 21:10:40 1.456.2.6 +++ loncom/xml/londefdef.pm 2023/12/29 23:33:43 1.456.2.6.2.3 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Tags Default Definition Module # -# $Id: londefdef.pm,v 1.456.2.6 2021/12/14 21:10:40 raeburn Exp $ +# $Id: londefdef.pm,v 1.456.2.6.2.3 2023/12/29 23:33:43 raeburn Exp $ # # # Copyright Michigan State University Board of Trustees @@ -367,7 +367,7 @@ sub start_title { $Apache::londefdef::title = &Apache::lonxml::get_all_text('/title',$parser,$style); } elsif ($target eq 'tex') { - $currentstring .= '\keephidden{Title of the document: ' + $currentstring .= '\keephidden{Title of the document: '; } if ($target eq 'meta') { $currentstring=''; @@ -612,6 +612,9 @@ sub start_body { if ($env{'request.use_absolute'}) { $args->{'use_absolute'} = $env{'request.use_absolute'}; } + if ($env{'form.only_body'}) { + $args->{'only_body'} = 1; + } } $currentstring = &Apache::loncommon::start_page($Apache::londefdef::title, @@ -646,9 +649,9 @@ sub start_body { sub edit_controls { my ($nochgview) = @_; - my $result .= ' + my $result = &Apache::lonxml::seteditor_javascript().' <form method="post" action=""> -<div class="LC_edit_problem_header">'; +<div class="LC_edit_problem_header">'."\n"; unless ($nochgview) { $result .= ' <div class="LC_edit_problem_header_row1">'. @@ -657,7 +660,10 @@ sub edit_controls { </div>'; } $result .= ' -<div><input type="submit" name="editmode" accesskey="e" value="'.&mt('Edit').'" />'; +<div> +<input type="hidden" name="editmode" value="" /> +<input type="button" name="editordefault" accesskey="e" value="'.&mt('Edit'). +'" onclick="seteditmode(this.form,'."'edit'".');" />'."\n"; if (($env{'request.course.id'}) && ($env{'form.forceedit'})) { my $url=&Apache::lonnet::hreflocation('',$env{'request.filename'}); if ($url =~ /\.html?$/i) { @@ -3267,12 +3273,12 @@ sub end_externallink { return $currentstring; } -#-- <blankspace heigth=""> +#-- <blankspace height=""> sub start_blankspace { my ($target,$token,$tagstack,$parstack,$parser,$safeeval) = @_; my $currentstring = &end_p(); # closes off any unclosed <p> if ($target eq 'tex') { - my $howmuch = &Apache::lonxml::get_param('heigth',$parstack,$safeeval,undef,1); + my $howmuch = &Apache::lonxml::get_param('height',$parstack,$safeeval,undef,1); $currentstring .= '\vskip '.$howmuch.' '; } return $currentstring; @@ -4278,10 +4284,10 @@ sub resize_image { $height_param=$TeXwidth/$old_width_param*$height_param; } } elsif ($TeXheight) { - $height_param = $TeXheight; if ($height_param) { $width_param = $TeXheight/$height_param*$width_param; } + $height_param = $TeXheight; } elsif ($width) { my $old_width_param=$width_param; $width_param = $width*$scaling;