Factor out post generation components

lib/Render/Util.rakumod

@@ -35,3 +35,20 @@ sub post-link(Int:D $id, Post:D $post --> Str:D) is export {
 sub icon($icon) is export {
     i(:class("bx bx-$icon"))
 }
+
+sub mins-to-string($mins) is export {
+    if $mins < 60 {
+        $mins.Str ~ "m"
+    } else {
+        my $h = $mins div 60;
+        my $m = $mins mod 60;
+        $h.Str ~ "h" ~ $m.Str ~ "m"
+    }
+}
+
+sub intersperse (\element, +list) is export {
+    gather for list {
+        FIRST .take, next;
+        take slip element, $_;
+    }
+}