--- loncom/interface/Attic/lonremote.pm 2008/03/12 02:45:07 1.24 +++ loncom/interface/Attic/lonremote.pm 2009/02/26 16:17:30 1.27 @@ -1,7 +1,7 @@ # The LearningOnline Network # User Authentication Module # -# $Id: lonremote.pm,v 1.24 2008/03/12 02:45:07 raeburn Exp $ +# $Id: lonremote.pm,v 1.27 2009/02/26 16:17:30 schafran Exp $ # # Copyright Michigan State University Board of Trustees # @@ -43,7 +43,7 @@ sub launchremote { # -------------------------------------------------------- Menu script and info my $windowinfo=&Apache::lonmenu::open($env{'browser.os'}); my $startupremote=&Apache::lonmenu::startupremote($lowerurl); - my $start_page = &Apache::loncommon::start_page('Remote Control', + my $start_page = &Apache::loncommon::start_page('Page Display Settings', $startupremote); my $end_page = &Apache::loncommon::end_page(); my $remoteinfo=&Apache::lonmenu::load_remote_msg($lowerurl); @@ -64,9 +64,13 @@ ENDLAUNCH sub collapseremote { my ($r,$lowerurl)=@_; # -------------------------------------------------------- Menu script and info - my $start_page = &Apache::loncommon::start_page('Collapse Remote Control', - undef, - {'no_inline_link' => 1,}); + my $brcrum = [{href=>"/adm/preferences",text=>"Set User Preferences"}, + {href=>"/adm/remote?url=/adm/preferences&action=collapse",text=>"Collapse Remote Control"}]; + my $start_page = + &Apache::loncommon::start_page('Collapse Remote Control', + undef, + {'bread_crumbs' => $brcrum, + 'no_inline_link' => 1,}); my $end_page = &Apache::loncommon::end_page(); my $windowinfo=&Apache::lonmenu::close(); # my $switch='';