فهرست منبع

Allow calls to readState without a predefined exists hash

Zachary Kotlarek 13 سال پیش
والد
کامیت
7b8461bf8b
1فایلهای تغییر یافته به همراه4 افزوده شده و 0 حذف شده
  1. 4 0
      dmx/DMX.pm

+ 4 - 0
dmx/DMX.pm

@@ -98,6 +98,10 @@ sub parseState($$$) {
 	my ($text, $exists, $mtime) = @_;
 	my ($text, $exists, $mtime) = @_;
 	my $cmdState    = undef();
 	my $cmdState    = undef();
 	my $exists_text = undef();
 	my $exists_text = undef();
+	if (!defined($exists)) {
+		my %tmp = ();
+		$exists  = \%tmp;
+	}
 	if (!defined($mtime)) {
 	if (!defined($mtime)) {
 		my %tmp = ();
 		my %tmp = ();
 		$mtime  = \%tmp;
 		$mtime  = \%tmp;