Revision 45c42be0
Von Sven Schöling vor fast 13 Jahren hinzugefügt
SL/Helper/Flash.pm | ||
---|---|---|
46 | 46 |
sub _check_category { |
47 | 47 |
my ($c) = @_; |
48 | 48 |
return $valid_categories{$c} |
49 |
|| die 'invalid category for flash'; |
|
49 |
|| do { |
|
50 |
require Carp; |
|
51 |
croak("invalid category '$c' for flash"); |
|
52 |
}; |
|
50 | 53 |
} |
51 | 54 |
|
52 | 55 |
1; |
Auch abrufbar als: Unified diff
Sinnvollere Fehlermeldungen bei fehlerhaften Flash codes.