Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -2263,11 +2263,11 @@
      (set! *didsomething* #t)))
      
 (if (args:get-arg "-generate-html")
     (let* ((toppath (launch:setup)))
       (if (tests:create-html-tree #f)
-          (debug:print-info 0 *default-log-port* "HTML output created in " toppath "/lt/page#.html")
+          (debug:print-info 0 *default-log-port* "HTML output created in " toppath "/lt/page0.html")
           (debug:print 0 *default-log-port* "Failed to create HTML output in " toppath "/lt/runs-index.html"))
       (set! *didsomething* #t)))
 (if (args:get-arg "-generate-html-structure")
     (let* ((toppath (launch:setup)))
       ;(if (tests:create-html-tree #f)