version 1.23, 2001/08/09 16:30:17
|
version 1.24, 2001/08/13 17:36:32
|
Line 5
|
Line 5
|
# |
# |
# 05/29/00,05/30 Gerd Kortemeyer) |
# 05/29/00,05/30 Gerd Kortemeyer) |
# 08/30,08/31,09/06,09/14,09/15,09/16,09/19,09/20,09/21,09/23, |
# 08/30,08/31,09/06,09/14,09/15,09/16,09/19,09/20,09/21,09/23, |
# 10/02,10/10,10/14,10/16,10/18,10/19,10/31,11/6,11/14,11/16 Gerd Kortemeyer |
# 10/02,10/10,10/14,10/16,10/18,10/19,10/31,11/6,11/14,11/16, |
|
# 08/13/01 Gerd Kortemeyer |
|
|
package Apache::lonpage; |
package Apache::lonpage; |
|
|
Line 275 sub handler {
|
Line 276 sub handler {
|
$output=~s/(\"|\'|\=\s*)$_(\"|\'|\s|\>)/$1$newlocation$2/; |
$output=~s/(\"|\'|\=\s*)$_(\"|\'|\s|\>)/$1$newlocation$2/; |
} |
} |
} @rlinks; |
} @rlinks; |
$output=~s/\<\s*applet/\<applet codebase=\"$thisdir\" /gi; |
# -------------------------------------------------- Deal with Applet codebases |
|
$output=~s/(\<applet[^\>]+)(codebase\=[^\S\>]+)*([^\>]*)\>/$1.($2?$2:' codebase="'.$thisdir.'"').$3.'>'/gei; |
$ssibody{$_}=$output; |
$ssibody{$_}=$output; |
# ---------------------------------------------------------------- End SSI cell |
# ---------------------------------------------------------------- End SSI cell |
} |
} |