[LON-CAPA-cvs] cvs: loncom /publisher loncleanup.pm
raeburn
raeburn at source.lon-capa.org
Sun Jul 23 09:07:24 EDT 2023
raeburn Sun Jul 23 13:07:24 2023 EDT
Modified files:
/loncom/publisher loncleanup.pm
Log:
- Breadcrumbs text when displaying/editing resource in Course Authoring Space.
Index: loncom/publisher/loncleanup.pm
diff -u loncom/publisher/loncleanup.pm:1.20 loncom/publisher/loncleanup.pm:1.21
--- loncom/publisher/loncleanup.pm:1.20 Tue Jun 4 22:20:16 2013
+++ loncom/publisher/loncleanup.pm Sun Jul 23 13:07:24 2023
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to cleanup XML files
#
-# $Id: loncleanup.pm,v 1.20 2013/06/04 22:20:16 raeburn Exp $
+# $Id: loncleanup.pm,v 1.21 2023/07/23 13:07:24 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -449,8 +449,17 @@
$r->send_http_header;
# Breadcrumbs
- my $brcrum = [{'href' => &Apache::loncommon::authorspace($fn),
- 'text' => 'Authoring Space'},
+ my $text = 'Authoring Space';
+ my $href = &Apache::loncommon::authorspace($fn);
+ if ($env{'request.course.id'}) {
+ my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
+ my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
+ if ($href eq "/priv/$cdom/$cnum/") {
+ $text = 'Course Authoring Space';
+ }
+ }
+ my $brcrum = [{'href' => $href,
+ 'text' => $text,
{'href' => '',
'text' => 'Cleanup XML Document'}];
More information about the LON-CAPA-cvs
mailing list