--- loncom/xml/londefdef.pm 2013/10/12 01:26:31 1.449 +++ loncom/xml/londefdef.pm 2014/05/15 20:19:06 1.451 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Tags Default Definition Module # -# $Id: londefdef.pm,v 1.449 2013/10/12 01:26:31 raeburn Exp $ +# $Id: londefdef.pm,v 1.451 2014/05/15 20:19:06 raeburn Exp $ # # # Copyright Michigan State University Board of Trustees @@ -585,14 +585,15 @@ sub start_body { # FIXME Where are we? } + my $args = {'add_entries' => $token->[2], + 'force_register' => 1,}; + if ($target eq 'web') { + $args->{'print_suppress'} = 1; + } $currentstring = &Apache::loncommon::start_page($Apache::londefdef::title, $Apache::londefdef::head - .$extra_head, - {'add_entries' => $token->[2], -# 'no_title' => 1, - 'force_register' => 1}); - + .$extra_head,$args); my $header = ''; if ($env{'request.state'} ne 'published' && $env{'request.state'} ne 'construct') { @@ -4595,7 +4596,7 @@ sub latex_header { sub clean_docs_httpref { my ($href,$docuri,$cdom,$cnum) = @_; if ($docuri eq '') { - &Apache::lonnet::hreflocation('',$env{'request.filename'}); + $docuri = &Apache::lonnet::hreflocation('',$env{'request.filename'}); } if ($cdom eq '') { $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};