|
Lines 169-175
sub tidy_tt {
Link Here
|
| 169 |
$content =~ s#<!--</head>-->#</head>#g; |
169 |
$content =~ s#<!--</head>-->#</head>#g; |
| 170 |
$content =~ s#<!--<body(.*)-->#<body$1#g; |
170 |
$content =~ s#<!--<body(.*)-->#<body$1#g; |
| 171 |
$content =~ s#<!--</body>-->#</body>#g; |
171 |
$content =~ s#<!--</body>-->#</body>#g; |
| 172 |
$content =~ s#\n*( *)<script>\n*#\n$1<script>\n#g; |
172 |
$content =~ s#\n*( *)(<script\b[^>]*>)\n*#\n$1$2\n#g; |
| 173 |
$content =~ s#\n*( *)</script>\n*#\n$1</script>\n#g; |
173 |
$content =~ s#\n*( *)</script>\n*#\n$1</script>\n#g; |
| 174 |
$content =~ s#(\[%\s*SWITCH[^\]]*\]\n)\n#$1#g; |
174 |
$content =~ s#(\[%\s*SWITCH[^\]]*\]\n)\n#$1#g; |
| 175 |
|
175 |
|
| 176 |
- |
|
|