@@ -, +, @@ --- suggestion/suggestion.pl | 1 - 1 file changed, 1 deletion(-) --- a/suggestion/suggestion.pl +++ a/suggestion/suggestion.pl @@ -223,7 +223,6 @@ elsif ($op eq "change" ) { foreach my $suggestionid (@editsuggestions) { next unless $suggestionid; $suggestion->{suggestionid} = $suggestionid; - use Data::Printer colored => 1; warn p $suggestion; &ModSuggestion($suggestion); } my $params = ''; --