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

raeburn raeburn at source.lon-capa.org
Sat Feb 18 14:05:51 EST 2017


raeburn		Sat Feb 18 19:05:51 2017 EDT

  Modified files:              
    /loncom/interface	lonsyllabus.pm 
  Log:
  - Include breadcrumb trail for Syllabus included in Supplement Content area.
  
  
Index: loncom/interface/lonsyllabus.pm
diff -u loncom/interface/lonsyllabus.pm:1.140 loncom/interface/lonsyllabus.pm:1.141
--- loncom/interface/lonsyllabus.pm:1.140	Sat Feb 20 00:12:40 2016
+++ loncom/interface/lonsyllabus.pm	Sat Feb 18 19:05:51 2017
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Syllabus
 #
-# $Id: lonsyllabus.pm,v 1.140 2016/02/20 00:12:40 raeburn Exp $
+# $Id: lonsyllabus.pm,v 1.141 2017/02/18 19:05:51 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -116,7 +116,7 @@
         }
         unless ($allowed && $forceedit) {
             my $file=&Apache::lonnet::filelocation("",$item);
-            if ($file =~ /\.(tex|x?html?)$/) {  
+            if ($file =~ /\.(tex|x?html?)$/) {
                 my $filetype = $1;
                 my $filecontents=&Apache::lonnet::getfile($file);
                 if ($filecontents eq -1) {
@@ -168,7 +168,16 @@
                               &mt('Print the syllabus directly from your web browser').
                               '\end{document}');
                 } else {
-                    $r->print(&Apache::lonwrapper::wrapper($item,undef,$env{'request.use_absolute'},
+                    my $brcrum;
+                    if ($env{'form.folderpath'} =~ /^supplemental/) {
+                        my $title = $env{'form.title'};
+                        if ($title eq '') {
+                            $title = &mt('Syllabus');
+                        }
+                        $brcrum =
+                            &Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1);
+                    }
+                    $r->print(&Apache::lonwrapper::wrapper($item,$brcrum,$env{'request.use_absolute'},
                                                            undef,$is_pdf,undef,&mt('Syllabus')));
                 }
             }
@@ -183,11 +192,19 @@
                          '\end{document}');
             } else {
                 my $is_ext = 1;
-                my $is_pdf;
+                my ($is_pdf,$brcrum);
                 if ($external =~ /\.pdf$/i) {
                     $is_pdf = 1;
                 }
-                $r->print(&Apache::lonwrapper::wrapper($external,undef,$env{'request.use_absolute'},
+                if ($env{'form.folderpath'} =~ /^supplemental/) {
+                    my $title = $env{'form.title'};
+                    if ($title eq '') {
+                        $title = &mt('Syllabus');
+                    }
+                    $brcrum =
+                        &Apache::lonhtmlcommon::docs_breadcrumbs(undef,$crstype,undef,$title,1);
+                }
+                $r->print(&Apache::lonwrapper::wrapper($external,$brcrum,$env{'request.use_absolute'},
                                                        $is_ext,$is_pdf,undef,&mt('Syllabus')));
             }
             return OK;




More information about the LON-CAPA-cvs mailing list