[LON-CAPA-cvs] cvs: loncom /interface lonsearchcat.pm
www
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 28 May 2008 21:23:17 -0000
www Wed May 28 17:23:17 2008 EDT
Modified files:
/loncom/interface lonsearchcat.pm
Log:
Bug #4106: don't show "custom" results
Index: loncom/interface/lonsearchcat.pm
diff -u loncom/interface/lonsearchcat.pm:1.293 loncom/interface/lonsearchcat.pm:1.294
--- loncom/interface/lonsearchcat.pm:1.293 Wed May 28 17:07:29 2008
+++ loncom/interface/lonsearchcat.pm Wed May 28 17:23:17 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Search Catalog
#
-# $Id: lonsearchcat.pm,v 1.293 2008/05/28 21:07:29 www Exp $
+# $Id: lonsearchcat.pm,v 1.294 2008/05/28 21:23:17 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2116,6 +2116,10 @@
($env{'user.domain'} ne $resdom)) {
return 0;
}
+ # Check for custom rights
+ if ($Metadata->{'copyright'} eq 'custom') {
+ return 0;
+ }
return 1;
}