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

[raeburn]

raeburn		Thu Dec 28 19:38:18 2023 EDT

  Modified files:              
    /loncom/interface	lonmenu.pm 
  Log:
  - Print icon/link omitted from Functions menu in Authoring Space when
    viewing mime types without specific rendering implemented for tex target.
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.543 loncom/interface/lonmenu.pm:1.544
--- loncom/interface/lonmenu.pm:1.543	Wed Dec 13 22:12:16 2023
+++ loncom/interface/lonmenu.pm	Thu Dec 28 19:38:17 2023
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.543 2023/12/13 22:12:16 raeburn Exp $
+# $Id: lonmenu.pm,v 1.544 2023/12/28 19:38:17 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1298,10 +1298,14 @@
 s&7&1&del.png&Delete&resource[_2]&gocstr('/adm/cfile?action=delete','/priv/$udom/$uname/$cleandisfn')&Delete this resource
 ENDMENUITEMS
                 }
-                $menuitems .= (<<ENDMENUITEMS);
+#
+# Print only makes sense for certain mime types
+#
+                if ($thisdisfn=~/\.(xml|html|htm|xhtml|xhtm|tex)$/ || $thisdisfn=~/$LONCAPA::assess_re/) {
+                    $menuitems .= (<<ENDMENUITEMS);
 s&7&2&prt.png&Print&printout[_1]&gocstr('/adm/printout','/priv/$udom/$uname/$cleandisfn')&Prepare a printable document
 ENDMENUITEMS
-            }
+                }
                 if (ref($bread_crumbs) eq 'ARRAY') {
                     &Apache::lonhtmlcommon::clear_breadcrumbs();
                     foreach my $crumb (@{$bread_crumbs}){