fix anchor links on t-intro

dashborg · Jan 28, 2022 · 64401e7 · 64401e7
1 parent 19baa2e
commit 64401e7
Showing 1 changed file with 11 additions and 9 deletions.
diff --git a/playground/libs/playground.html b/playground/libs/playground.html
@@ -38,15 +38,17 @@
     if ([email protected]) {
         //@hibiki/update-url(page=@page);
     }
-    $.activepage = @page;
-    @blob = callhandler(@url='/tutorial/'+$.activepage+'.html');
-    @match = fn:match(fn:blobastext(@blob), "^([\\s\\S]*)--------([\\s\\S]*)$");
-    $.codetext = @match[1];
-    //@lib-codemirror/setCMText(text=$.codetext);
-    //@lib/make-iframe(text=$.codetext, bulma=$.bulma);
-    $.tutorial_content = "";
-    //@hibiki/sleep(ms=1);  /* creates a render gap forcing content container to scroll up */
-    $.tutorial_content = @match[2];
+    if ($.activepage != @page) {
+        $.activepage = @page;
+        @blob = callhandler(@url='/tutorial/'+$.activepage+'.html');
+        @match = fn:match(fn:blobastext(@blob), "^([\\s\\S]*)--------([\\s\\S]*)$");
+        $.codetext = @match[1];
+        //@lib-codemirror/setCMText(text=$.codetext);
+        //@lib/make-iframe(text=$.codetext, bulma=$.bulma);
+        $.tutorial_content = "";
+        //@hibiki/sleep(ms=10);  /* creates a render gap forcing content container to scroll up */
+        $.tutorial_content = @match[2];
+    }
   </define-handler>
 
   <script>