From 53f5395019e9736a87ceac25258c9c67bbdcc7f5 Mon Sep 17 00:00:00 2001
From: lenosisnickerboa <lennart@oscarssons.com>
Date: Sun, 1 Nov 2020 15:53:38 +0100
Subject: [PATCH] Now properly sets tv_port option as start argument

---
 src/server_support.tcl | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/src/server_support.tcl b/src/server_support.tcl
index 1882de8..73ceaab 100755
--- a/src/server_support.tcl
+++ b/src/server_support.tcl
@@ -140,6 +140,14 @@ proc GetStartServerCommand {} {
         set serverPortOption "-port $serverPort"
     }
 
+    global gotvConfig
+    set tvPortOption ""
+    set goTvEnable [GetConfigValue $gotvConfig gotvenable]
+    if { $goTvEnable != 0 } {
+        set goTvPort [GetConfigValue $gotvConfig gotvport]
+        set tvPortOption "+tv_port $goTvPort"
+    }
+
     global runConfig
     set gameModeTypeString [GetConfigValue $runConfig gamemodetype]
     global gameModeMapper
@@ -224,6 +232,7 @@ proc GetStartServerCommand {} {
             $serverNetPortTry \
             -maxplayers_override $players \
             -tickrate $tickRate \
+            $tvPortOption \
             $passwordOption \
             $ipOption \
             +hostname \"$serverName\" $serverPortOption $serverLanOption \
@@ -239,6 +248,7 @@ proc GetStartServerCommand {} {
             $autoServerUpdateOption \
             -maxplayers_override $players \
             -tickrate $tickRate \
+            $tvPortOption \
             $passwordOption \
             $ipOption \
             +hostname \\\"$serverName\\\" $serverPortOption $serverLanOption \