Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
M
mooc-rr-ressources
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
4
Merge Requests
4
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Commits
Issue Boards
Open sidebar
Learning Lab
mooc-rr-ressources
Commits
24c0a06b
Commit
24c0a06b
authored
Mar 22, 2019
by
Arnaud Legrand
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[HTML rendering] Stupid me!
parent
64381acf
Changes
1
Show whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
8 additions
and
6 deletions
+8
-6
pandoc_fixer.pl
bin/pandoc_fixer.pl
+8
-6
No files found.
bin/pandoc_fixer.pl
View file @
24c0a06b
...
@@ -47,6 +47,7 @@ while(defined(my $line=<INPUT>)) {
...
@@ -47,6 +47,7 @@ while(defined(my $line=<INPUT>)) {
if
(
$line
=~
/<h1 class="title"/
)
{
next
;
}
if
(
$line
=~
/<h1 class="title"/
)
{
next
;
}
if
(
$line
=~
/<h1 class="date"/
)
{
next
;
}
if
(
$line
=~
/<h1 class="date"/
)
{
next
;
}
# $line =~ s|https://gitlab.inria.fr/learninglab/|https://learninglab.gitlabpages.inria.fr/|g; ## Not such a good idea!
# $line =~ s|https://gitlab.inria.fr/learninglab/|https://learninglab.gitlabpages.inria.fr/|g; ## Not such a good idea!
if
(
$line
=~
/<body>/
)
{
if
(
$input
=~
/_fr.html/
)
{
if
(
$input
=~
/_fr.html/
)
{
$line
=~
s
|<
body
>|<
body
>
Les
<
a
href
=
'$gitlab_origin/$input'
>
sources
de
ce
document
sont
disponibles
sur
gitlab
</
a
>.|
g
;
$line
=~
s
|<
body
>|<
body
>
Les
<
a
href
=
'$gitlab_origin/$input'
>
sources
de
ce
document
sont
disponibles
sur
gitlab
</
a
>.|
g
;
$line
.=
"<br><i>Version du $gitdate.</i><br><hr/>\n"
$line
.=
"<br><i>Version du $gitdate.</i><br><hr/>\n"
...
@@ -54,6 +55,7 @@ while(defined(my $line=<INPUT>)) {
...
@@ -54,6 +55,7 @@ while(defined(my $line=<INPUT>)) {
$line
=~
s
|<
body
>|<
body
>
The
<
a
href
=
'$gitlab_origin/$input'
>
source
of
this
this
document
is
available
on
gitlab
</
a
>.|
g
;
$line
=~
s
|<
body
>|<
body
>
The
<
a
href
=
'$gitlab_origin/$input'
>
source
of
this
this
document
is
available
on
gitlab
</
a
>.|
g
;
$line
.=
"<br><i>Last version: $gitdate</i><br><hr/>\n"
$line
.=
"<br><i>Last version: $gitdate</i><br><hr/>\n"
}
}
}
$line
=~
s
|<
span
class
=
"smallcaps"
>
TOC
</
span
>||
g
;
$line
=~
s
|<
span
class
=
"smallcaps"
>
TOC
</
span
>||
g
;
$line
=~
s
|---<
/p>|<hr/
>|
g
;
$line
=~
s
|---<
/p>|<hr/
>|
g
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment