[LON-CAPA-cvs] cvs: loncom(version_2_2_X) /homework bridgetask.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Mon, 06 Nov 2006 16:55:55 -0000
albertel Mon Nov 6 11:55:55 2006 EDT
Modified files: (Branch: version_2_2_X)
/loncom/homework bridgetask.pm
Log:
- backport 1.192
Index: loncom/homework/bridgetask.pm
diff -u loncom/homework/bridgetask.pm:1.184.2.2 loncom/homework/bridgetask.pm:1.184.2.3
--- loncom/homework/bridgetask.pm:1.184.2.2 Mon Nov 6 11:36:05 2006
+++ loncom/homework/bridgetask.pm Mon Nov 6 11:55:53 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: bridgetask.pm,v 1.184.2.2 2006/11/06 16:36:05 albertel Exp $
+# $Id: bridgetask.pm,v 1.184.2.3 2006/11/06 16:55:53 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -326,9 +326,22 @@
my ($target) = @_;
if ($target eq 'web'
|| $target eq 'webgrade') {
- return (<<STYLE);
+ my $style = (<<STYLE);
<link rel="stylesheet" type="text/css" href="/res/adm/includes/task.css" />
STYLE
+ if ($env{'browser.type'} eq 'explorer'
+ && $env{'browser.os'} eq 'win' ) {
+ if ($env{'browser.version'} < 7) {
+ $style .= (<<STYLE);
+<link rel="stylesheet" type="text/css" href="/res/adm/includes/task_ie.css" />
+STYLE
+ } else {
+ $style .= (<<STYLE);
+<link rel="stylesheet" type="text/css" href="/res/adm/includes/task_ie7.css" />
+STYLE
+ }
+ }
+
}
return;
}