[prev in list] [next in list] [prev in thread] [next in thread] 

List:       lon-capa-cvs
Subject:    [LON-CAPA-cvs] cvs: rat / lonpage.pm
From:       raeburn <raeburn () source ! lon-capa ! org>
Date:       2012-11-30 18:16:53
Message-ID: cvsraeburn1354299413 () cvsserver
[Download RAW message or body]

raeburn		Fri Nov 30 18:16:53 2012 EDT

  Modified files:              
    /rat	lonpage.pm 
  Log:
  - No evaluation icon for content from /uploaded/
  
  
Index: rat/lonpage.pm
diff -u rat/lonpage.pm:1.97 rat/lonpage.pm:1.98
--- rat/lonpage.pm:1.97	Mon Nov  7 20:06:29 2011
+++ rat/lonpage.pm	Fri Nov 30 18:16:53 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.97 2011/11/07 20:06:29 www Exp $
+# $Id: lonpage.pm,v 1.98 2012/11/30 18:16:53 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -603,11 +603,13 @@
 	    '<img src="/adm/lonMisc/cat_button.png" class="LC_icon" />'.
 	    '</a>';
     }
-    $metainfo .= '<a href="/adm/evaluate?postdata='.
-	&escape($esrc).
-	'" target="LONcatInfo">'.
-	'<img src="/adm/lonMisc/eval_button.png" class="LC_icon" />'.
-	'</a>';
+    if ($hash->{'src_'.$rid} !~ m{^/uploaded/}) {
+        $metainfo .= '<a href="/adm/evaluate?postdata='.
+	    &escape($esrc).
+	    '" target="LONcatInfo">'.
+	    '<img src="/adm/lonMisc/eval_button.png" class="LC_icon" />'.
+	    '</a>';
+    }
     if (($hash->{'src_'.$rid}=~/$LONCAPA::assess_re/) &&
 	($hash->{'src_'.$rid} !~ m-^/uploaded/-)) {
 


_______________________________________________
LON-CAPA-cvs mailing list
LON-CAPA-cvs@mail.lon-capa.org
http://mail.lon-capa.org/mailman/listinfo/lon-capa-cvs
[prev in list] [next in list] [prev in thread] [next in thread]