--- loncom/interface/lonwishlist.pm 2012/05/14 16:39:41 1.11 +++ loncom/interface/lonwishlist.pm 2012/05/15 01:41:27 1.12 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Utility-routines for wishlist # -# $Id: lonwishlist.pm,v 1.11 2012/05/14 16:39:41 raeburn Exp $ +# $Id: lonwishlist.pm,v 1.12 2012/05/15 01:41:27 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -511,7 +511,7 @@ sub getNodesToArray { # Return a script-tag containing Javascript-function # needed for wishlist actions like 'new link' ect. sub JSforWishlist { - my $startPagePopup = &Apache::loncommon::start_page('Wishlist',undef, + my $startPagePopup = &Apache::loncommon::start_page('Stored Links',undef, {'only_body' => 1, 'js_ready' => 1, 'bgcolor' => '#FFFFFF',}); @@ -1415,13 +1415,13 @@ sub makePage { &Apache::lonhtmlcommon::clear_breadcrumbs(); &Apache::lonhtmlcommon::add_breadcrumb( { href => '/adm/wishlist?mode='.$mode, - text => 'Wishlist'}); - my $startPage = &Apache::loncommon::start_page('Wishlist',undef, + text => 'Stored Links'}); + my $startPage = &Apache::loncommon::start_page('Stored Links',undef, {'add_entries' => { 'onload' => 'javascript:onLoadAction('."'".$mode."'".');', 'onunload' => 'javascript:window.name = '."'loncapaclient'"}}); - my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(&mt('Wishlist').&Apache::loncommon::help_open_topic('Wishlist')); + my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(&mt('Stored Links').&Apache::loncommon::help_open_topic('Wishlist')); # get javascript-code for wishlist-interactions my $js = &JSforWishlist(); @@ -1513,7 +1513,7 @@ sub makePage { $inner .= &Apache::loncommon::end_data_table(); } else { - $inner .= ''.&mt("Your wishlist ist currently empty.").''; + $inner .= ''.&mt("Your Store Links list is currently empty.").''; } $wishlistHTMLedit = ''; } @@ -1523,7 +1523,7 @@ sub makePage { $inner .= ''.$wishlistHTMLview.'
'; } else { - $inner .= ''.&mt("Your wishlist ist currently empty.").''; + $inner .= ''.&mt("Your Stored Links list is currently empty.").''; } $wishlistHTMLview = ''; } @@ -1586,7 +1586,7 @@ sub makePopUpNewLink { # HTML-Markup for the Pop-Up-window 'Set a link for this resource to wishlist' my $startPageWishlistlink = - &Apache::loncommon::start_page('Set link to wishlist',undef, + &Apache::loncommon::start_page('Save to Stored Links',undef, {'only_body' => 1, 'bgcolor' => '#FFFFFF',}); @@ -1595,7 +1595,7 @@ sub makePopUpNewLink { 'or to external websites. Paths to LON-CAPA resources must be of the form /res/dom/usr... . '. 'Paths to external websites must contain the network protocol (e.g. http://...).'); - my $inPageWishlistlink1 = '

'.&mt('Set a link to wishlist').'

'; + my $inPageWishlistlink1 = '

'.&mt('Save to Stored Links').'

'; # If no title is delivered, 'New Link' is called up from the wishlist-interface, so after # submitting the window should close instead of offering a link to wishlist (like it should do # if we call 'Set New Link' from within a browsed ressource) @@ -1743,16 +1743,16 @@ SCRIPT # Returns the HTML-Markup for the page, shown when a link was set sub makePageSet { # start_page - my $startPage = &Apache::loncommon::start_page('Wishlist',undef, + my $startPage = &Apache::loncommon::start_page('Stored Links',undef, {'only_body' => 1}); # confirm success and offer link to wishlist - my $message = &Apache::lonhtmlcommon::confirm_success(&mt('Link successfully set!')); + my $message = &Apache::lonhtmlcommon::confirm_success(&mt('Link successfully saved!')); $message = &Apache::loncommon::confirmwrapper($message); my $inner .= '
'.$message.'

'. - ''.&mt('Go to wishlist').''. - ' '.&mt('Close this window').''; + ''.&mt('Go to Stored Links').''.(' ' x 3). + ''.&mt('Close this window').''; # end_page my $endPage = &Apache::loncommon::end_page(); @@ -1772,14 +1772,14 @@ sub makePageImport { $root = $rootgiven; @childrenRt = $root->children(); # start_page - my $startPage = &Apache::loncommon::start_page('Wishlist',undef, + my $startPage = &Apache::loncommon::start_page('Stored Links',undef, {'only_body' => 1}); # get javascript-code for wishlist-interactions my $js = &JSforWishlist(); $js .= &JSforImport($rat); - my $inner = '

'.&mt('Import Resources from Wishlist').'

'; + my $inner = '

'.&mt('Import Resources from Stored Links').'

'; if (!$rat) { $inner .= '

'.&mt("Please note that you can use the checkboxes corresponding to a folder to ". "easily check all links within this folder. The folder structure itself can't be imported. ". @@ -1818,7 +1818,7 @@ sub makePageImport { $inner .= ''.$wishlistHTMLimport.'
'; } else { - $inner .= ''.&mt("Your wishlist ist currently empty.").''; + $inner .= ''.&mt("Your Stored Links list is currently empty.").''; } $wishlistHTMLimport = ''; @@ -1840,9 +1840,9 @@ sub makeErrorPage { &Apache::lonhtmlcommon::add_breadcrumb( { href => '/adm/wishlist', text => 'Wishlist'}); - my $startPage = &Apache::loncommon::start_page('Wishlist'); + my $startPage = &Apache::loncommon::start_page('Stored Links'); - my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(&mt('Wishlist').&Apache::loncommon::help_open_topic('Wishlist')); + my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(&mt('Stored Links').&Apache::loncommon::help_open_topic('Wishlist')); &Apache::lonhtmlcommon::clear_breadcrumbs(); # error-message