Add sidenote shortcode for hugo. Improve test

Author: mdbenito

extensions/hugo/shortcodes/sidenote.html.html

@@ -0,0 +1,69 @@
+{{/* Simple sidenotes.
+Assumes main content to be col-md-9 and the rows to be justify-content-end.
+Some content breaks paragraphs!
+
+Usage:
+
+{{< sidenote class="optional CSS class" valign=<top,center,bottom>
+             numbered=numbered raw=raw header="Some text" >}}
+Content here.
+{{< /sidenote >}}
+Parameters:
+  class: one or more CSS class names
+  valign: where the bottom of the sidenote will be placed wrt the inline content.
+          "top" is the default: the sidenote starts at the height it is inserted.
+          "center" shifts it by 50% upwards, "bottom" by 100%.
+  numbered: whether to prefix the content with an autoincreased counter and
+            display it in the main text.
+  raw: set to true if there are nested shortcodes, e.g. {{<figure>}} or {{<toc>}}
+  header: This will be rendered bold and centered above the content
+*/}}
+{{- $this := . -}}
+{{- $class := "sidenote" -}}
+{{- with .Get "valign" -}}
+    {{- if (eq . "center") -}}
+        {{- $class = printf "%s %s" $class (safeHTMLAttr "sidenote-center") -}}
+    {{- end -}}
+    {{- if (eq . "bottom") -}}
+        {{- $class = printf "%s %s" $class (safeHTMLAttr "sidenote-bottom") -}}
+    {{- end -}}
+{{- end -}}
+{{- with .Get "class" -}}
+    {{- $class = printf "%s %s" $class (safeHTMLAttr .) -}}
+{{- end -}}
+{{- $refText := "" -}}
+{{- $content := .Inner -}}
+{{- with .Get "numbered" -}}
+    {{- $this.Page.Scratch.Add "sidenote-counter" 1 -}}
+    {{- $refText = printf "%d" ($this.Page.Scratch.Get "sidenote-counter") -}}
+    {{- $content = printf "<span class=\"sidenote-ref\">%s</span> %s" $refText $content -}}
+{{- end -}}
+{{- if not (.Get "raw") -}}
+    {{- $content = $content | markdownify -}}
+    {{- $content = replace $content "<p>" "<span class=\"sidenote-paragraph\">" -}}
+    {{- $content = replace $content "</p>" "</span>" -}}
+{{- end -}}
+{{- if .Inner -}}
+    {{/*HACKY and incomplete. See https://stackoverflow.com/a/9852381/493464*/}}
+    {{- $hasNonPhrasingContent := findRE "<(p|div|pre|h[1-5]|figure|nav)" $content -}}
+    {{- if or $hasNonPhrasingContent (.Get "raw") -}}
+        <aside class="{{$class}}">
+            {{- with .Get "header" -}}
+                <div class="font-weight-bold mb-1 text-center">{{.}}</div>
+            {{- end -}}
+            {{- $content | safeHTML -}}
+        </aside>
+    {{- else -}}
+        <span class="{{$class}}">
+            {{- with .Get "header" -}}
+                <span class="font-weight-bold mb-1 text-center">{{.}}</span>
+            {{- end -}}
+            {{- $content | safeHTML -}}
+        </span>
+    {{- end -}}
+    <span class="sidenote-ref">{{- $refText -}}</span>
+{{- else -}}
+    <div class="alert alert-danger" role="alert">
+        Warning: unclosed sidenote shortcode
+    </div>
+{{- end -}}

tests/tfl/marginal-note.md tests/hugo/marginal-note.mdtests/tfl/marginal-note.md renamed to tests/hugo/marginal-note.md

@@ -4,4 +4,4 @@ title: "Some title"
 
 
 
-This text should have a sidenote next to it.{{< sidenote halign="right" valign="top" >}}This is the note, it is top aligned.{{</ sidenote >}}
+This text should have a sidenote next to it.{{< sidenote halign="right" valign="top" numbered="numbered" >}}This is the note, it is top aligned.{{</sidenote>}}

tests/tfl/marginal-note.tm tests/hugo/marginal-note.tmtests/tfl/marginal-note.tm renamed to tests/hugo/marginal-note.tm

@@ -29,6 +29,5 @@
     (set-preference "texmacs->markdown:flavour" "hugo")
     (set-preference "texmacs->markdown:paragraph-width" #f)
     (ftw "./hugo/" run-test)
-    (ftw "./tfl/" run-test)
     (set-preference "texmacs->markdown:hugo-extensions" save-hugo)
     (set-preference "texmacs->markdown:paragraph-width" save-width)))