B4J Question [ABMaterial] B4JS+B4J 7.80= Not working

Select Case Unit.ToUpperCase
   Case "K"
       Page.B4JSMsgbox("msgbox", "The distance is " & (Distance * ToKM) & " kilometers!", "Tutorial", "OK", False, ABM.MSGBOX_POS_CENTER_CENTER, "")
   Case "N"
       Page.B4JSMsgbox("msgbox", "The distance is " & (Distance * ToMiles) & " miles!", "Tutorial", "OK", False, ABM.MSGBOX_POS_CENTER_CENTER, "")
   Case Else
       Page.B4JSMsgbox("msgbox", "No idea what you are doing :-)", "Tutorial", "OK", False, ABM.MSGBOX_POS_CENTER_CENTER, "")
End Select

Dim dist As Double
Select Case Unit.ToUpperCase
       Case "K"
           dist = Distance * ToKM
           Log("The distance is " & dist & " kilometers!")
       Case "N"
           dist = Distance * ToMiles
           Log("The distance is " & dist & " miles!")
       Case Else
           Log("No idea what you are doing :-)")
   End Select

page.Msgbox("msgbox", "Your complex calculation is now " & ResultLabel.Text, "Result", "OK", False, ABM.MSGBOX_POS_CENTER_CENTER, "")

Log("Your complex calculation is now " & ResultLabel.Text)

b4js.1568915185870.js: 536 Uncaught SyntaxError: Unexpected token:
template.1568915185870.js: 21 Uncaught ReferenceError: b4js_test is not defined
     at template.1568915185870.js: 21

Sub TempFixB4JS
   Dim txtIN As TextReader
   txtIN.Initialize(File.OpenInput(File.DirApp & "/www/" & ABMShared.AppName, "b4js." & ABMShared.AppVersion & ".js"))
   Dim s As String = txtIN.ReadAll
   txtIN.Close
   
   s = s.Replace("swaloptions.rtl:","swaloptions.rtl=") '<--- this : should've been an =
   
   Dim txtOUT As TextWriter
   txtOUT.Initialize(File.OpenOutput(File.DirApp & "/www/" & ABMShared.AppName, "b4js." & ABMShared.AppVersion & ".js",False))
   txtOUT.Write(s)
   txtOUT.Close
End Sub

   ...
   ' start the server
   myApp.StartServer(srvr, "srvr", port)   
   
   TempFixB4JS '<----------------------