add debug output for unknown data type

5 years ago · e12db588bd
parent da4f9e4349
commit e12db588bd
1 changed files with 1 additions and 1 deletions
--- a/2
+++ b/2
@ -944,7 +944,7 @@ sub setup {
 	} elsif (ref $value eq 'ARRAY') {
 	    debug "$key: [" . (join ', ', @{$value}) . "]";
 	} else {
-	    error "unknown type";
+	    error "unknown type for key $key: " . (ref $value);
 	}
    }