Object names cannot contact special characters

webmin · Aug 4, 2019 · df8a43f · df8a43f
1 parent 8cf71f5
commit df8a43f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/web-lib-funcs.pl b/web-lib-funcs.pl
@@ -7307,7 +7307,7 @@ sub unserialise_variable
 elsif ($v[0] eq 'UNDEF') {
 	$rv = undef;
 	}
-elsif ($v[0] =~ /^OBJECT\s+(.*)$/) {
+elsif ($v[0] =~ /^OBJECT\s+([A-Za-z0-9_:]+)$/) {
 	# An object hash that we have to re-bless
 	my $cls = $1;
 	$rv = { };