[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface loncommon.pm
raeburn
raeburn at source.lon-capa.org
Wed Jul 31 18:14:33 EDT 2024
raeburn Wed Jul 31 22:14:33 2024 EDT
Modified files: (Branch: version_2_11_X)
/loncom/interface loncommon.pm
Log:
- For 2.11
Backport 1.1432
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.1075.2.167 loncom/interface/loncommon.pm:1.1075.2.168
--- loncom/interface/loncommon.pm:1.1075.2.167 Thu Jul 4 23:00:26 2024
+++ loncom/interface/loncommon.pm Wed Jul 31 22:14:33 2024
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.1075.2.167 2024/07/04 23:00:26 raeburn Exp $
+# $Id: loncommon.pm,v 1.1075.2.168 2024/07/31 22:14:33 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -8283,8 +8283,12 @@
$title = 'The LearningOnline Network with CAPA';
}
if (!$args->{'no_auto_mt_title'}) { $title = &mt($title); }
- $result .= '<title> LON-CAPA '.$title.'</title>'
- .'<link rel="stylesheet" type="text/css" href="'.$url.'"';
+ if ($title =~ /^LON-CAPA\s+/) {
+ $result .= '<title> '.$title.'</title>';
+ } else {
+ $result .= '<title> LON-CAPA '.$title.'</title>';
+ }
+ $result .= "\n".'<link rel="stylesheet" type="text/css" href="'.$url.'"';
if (!$args->{'frameset'}) {
$result .= ' /';
}
More information about the LON-CAPA-cvs
mailing list