[LON-CAPA-cvs] cvs: loncom /interface lonmenu.pm

[raeburn]

raeburn		Mon Aug 15 15:52:16 2016 EDT

  Modified files:              
    /loncom/interface	lonmenu.pm 
  Log:
  - Stored Links not available for resources published in Course "Authoring" 
    Space.
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.451 loncom/interface/lonmenu.pm:1.452
--- loncom/interface/lonmenu.pm:1.451	Sun Jun 19 04:27:50 2016
+++ loncom/interface/lonmenu.pm	Mon Aug 15 15:52:16 2016
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.451 2016/06/19 04:27:50 raeburn Exp $
+# $Id: lonmenu.pm,v 1.452 2016/08/15 15:52:16 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -877,12 +877,15 @@
             $got_prt = 1;
             if (($env{'user.adv'}) && ($env{'request.uri'} =~ /^\/res/)
                 && (!$env{'request.enc'})) {
-                # wishlist is only available for users with access to resource-pool
-                # and links can only be set for resources within the resource-pool
-                $menuitems .= (<<ENDMENUITEMS);
+                my ($cnum,$cdom) = &Apache::loncommon::crsauthor_url($env{'request.uri'});
+                unless ($cnum) {
+                    # wishlist is only available for users with access to resource-pool
+                    # and links can only be set for resources within the resource-pool
+                    $menuitems .= (<<ENDMENUITEMS);
 s&9&1&wishlist-link.png&Stored Links&wishlistlink[_2]&set_wishlistlink()&Save a link for this resource in my personal Stored Links repository&&1
 ENDMENUITEMS
-                $got_wishlist = 1;
+                    $got_wishlist = 1;
+                }
             }
 
 my $currentURL = &Apache::loncommon::get_symb();