|
Lines 223-229
elsif ($op eq "change" ) {
Link Here
|
| 223 |
foreach my $suggestionid (@editsuggestions) { |
223 |
foreach my $suggestionid (@editsuggestions) { |
| 224 |
next unless $suggestionid; |
224 |
next unless $suggestionid; |
| 225 |
$suggestion->{suggestionid} = $suggestionid; |
225 |
$suggestion->{suggestionid} = $suggestionid; |
| 226 |
use Data::Printer colored => 1; warn p $suggestion; |
|
|
| 227 |
&ModSuggestion($suggestion); |
226 |
&ModSuggestion($suggestion); |
| 228 |
} |
227 |
} |
| 229 |
my $params = ''; |
228 |
my $params = ''; |
| 230 |
- |
|
|