From 75791358e0b0fe8297f50f37a8a61fc5675be94b Mon Sep 17 00:00:00 2001
From: Arnaud Legrand <arnaud.legrand@imag.fr>
Date: Mon, 25 Mar 2019 09:56:49 +0100
Subject: [PATCH] [HTML] Trying to fix paths to internal documents

---
 bin/pandoc_fixer.pl | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/bin/pandoc_fixer.pl b/bin/pandoc_fixer.pl
index 1649973..65f05b3 100755
--- a/bin/pandoc_fixer.pl
+++ b/bin/pandoc_fixer.pl
@@ -30,7 +30,8 @@ my($output_temp) = $output."tmp";
 
 my($input_path)=$input;
 $input_path =~ s|/[^/]*$||g;
-my($url_path) = "https://gitlab.inria.fr/learninglab/mooc-rr/mooc-rr-ressources/raw/master/".$input_path;
+my($raw_path) = "https://gitlab.inria.fr/learninglab/mooc-rr/mooc-rr-ressources/raw/master/".$input_path;
+my($tree_path) = "https://gitlab.inria.fr/learninglab/mooc-rr/mooc-rr-ressources/tree/master/".$input_path;
 my($gitlab_origin)= "https://gitlab.inria.fr/learninglab/mooc-rr/mooc-rr-ressources/blob/master/";
 
 ########### Pandoc   #################
@@ -63,9 +64,13 @@ while(defined(my $line=<INPUT>)) {
     # $line =~ s|<p>TITLE:\(.*\)<br|<b>TITLE:$1</b><br|g;
 
     $line =~ s|img src="http|img src="%|g;
-    $line =~ s|img src="([^%][^"]*)"|img src="$url_path/$1?inline=false"|g;
+    $line =~ s|img src="([^%][^"]*)"|img src="$raw_path/$1"|g; # ?inline=false
     $line =~ s|img src="%|img src="http|g;
 
+    $line =~ s|href="http|href="%|g;
+    $line =~ s|href="([^%][^"]*)"|href="$tree_path/$1"|g; # ?inline=false
+    $line =~ s|href="%|href="http|g;
+
     # if($line =~ /img src="([^%][^"]*)"/) {
     # 	$line = "\t".$line;
     # }
-- 
2.18.1