@@ -6,7 +6,7 @@ MSync.AdminPanel = MSync.AdminPanel or {}
66 Arguments: parent sheet
77 Returns: panel
88]]
9- function MSync .AdminPanel .InitMySQL ( sheet )
9+ function MSync .AdminPanel .InitMySQL ( sheet )
1010 local pnl = vgui .Create ( " DPanel" , sheet )
1111
1212 local mysqlip_text = vgui .Create ( " DLabel" , pnl )
@@ -97,10 +97,10 @@ function MSync.AdminPanel.InitMySQL( sheet )
9797 dbstatus :SetText ( " DB Connection status: -Not Implemented-" )
9898
9999 local save_button = vgui .Create ( " DButton" , pnl )
100- save_button :SetText ( " Save Settings" )
100+ save_button :SetText ( " Save Settings" )
101101 save_button :SetPos ( 25 , 290 )
102102 save_button :SetSize ( 130 , 30 )
103- save_button .DoClick = function ()
103+ save_button .DoClick = function ()
104104 MSync .settings .mysql .host = mysqlip :GetValue ()
105105 MSync .settings .mysql .port = mysqlport :GetValue ()
106106 MSync .settings .mysql .database = mysqldb :GetValue ()
@@ -111,10 +111,10 @@ function MSync.AdminPanel.InitMySQL( sheet )
111111 end
112112
113113 local saveconnect_button = vgui .Create ( " DButton" , pnl )
114- saveconnect_button :SetText ( " Save and Connect" )
114+ saveconnect_button :SetText ( " Save and Connect" )
115115 saveconnect_button :SetPos ( 155 , 290 )
116116 saveconnect_button :SetSize ( 130 , 30 )
117- saveconnect_button .DoClick = function ()
117+ saveconnect_button .DoClick = function ()
118118 MSync .settings .mysql .host = mysqlip :GetValue ()
119119 MSync .settings .mysql .port = mysqlport :GetValue ()
120120 MSync .settings .mysql .database = mysqldb :GetValue ()
@@ -126,18 +126,18 @@ function MSync.AdminPanel.InitMySQL( sheet )
126126 end
127127
128128 local connect_button = vgui .Create ( " DButton" , pnl )
129- connect_button :SetText ( " Connect" )
129+ connect_button :SetText ( " Connect" )
130130 connect_button :SetPos ( 285 , 290 )
131131 connect_button :SetSize ( 130 , 30 )
132- connect_button .DoClick = function ()
132+ connect_button .DoClick = function ()
133133 MSync .net .connectDB ()
134134 end
135135
136136 local reset_button = vgui .Create ( " DButton" , pnl )
137- reset_button :SetText ( " Reset Settings" )
137+ reset_button :SetText ( " Reset Settings" )
138138 reset_button :SetPos ( 415 , 290 )
139139 reset_button :SetSize ( 130 , 30 )
140- reset_button .DoClick = function ()
140+ reset_button .DoClick = function ()
141141 mysqlip :SetText (" 127.0.0.1" )
142142 mysqlport :SetText (" 3306" )
143143 mysqldb :SetText (" msync" )
180180 Arguments: parent sheet
181181 Returns: panel
182182]]
183- function MSync .AdminPanel .InitModules ( sheet )
183+ function MSync .AdminPanel .InitModules ( sheet )
184184 local pnl = vgui .Create ( " DPanel" , sheet )
185185
186186 local ModuleList = vgui .Create ( " DListView" , pnl )
@@ -219,16 +219,19 @@ end
219219 Arguments: parent sheet
220220 Returns: panel
221221]]
222- function MSync .AdminPanel .InitModuleSettings ( sheet )
222+ function MSync .AdminPanel .InitModuleSettings ( sheet )
223223 local pnl = vgui .Create ( " DColumnSheet" , sheet )
224224
225225 local files , _ = file .Find (" msync/client_gui/modules/*.lua" , " LUA" )
226226
227227 for k , v in pairs (files ) do
228228 local info = include (" msync/client_gui/modules/" .. v )
229- MSync .modules [info .ModuleIdentifier ][" init" ]()
230- MSync .modules [info .ModuleIdentifier ][" net" ]()
231- pnl :AddSheet ( info .Name , MSync .modules [info .ModuleIdentifier ].adminPanel (pnl ))
229+
230+ if MSync .moduleState [info [" ModuleIdentifier" ]] then
231+ MSync .modules [info .ModuleIdentifier ][" init" ]()
232+ MSync .modules [info .ModuleIdentifier ][" net" ]()
233+ pnl :AddSheet ( info .Name , MSync .modules [info .ModuleIdentifier ].adminPanel (pnl ))
234+ end
232235 end
233236
234237 return pnl
0 commit comments