Revision 54ba4f0e
| SL/KIX18Client.pm | ||
|---|---|---|
| 19 | 19 |
|
| 20 | 20 |
|
| 21 | 21 |
sub create_ticket_with_article {
|
| 22 |
my ($self) = shift;
|
|
| 22 |
my $self = shift;
|
|
| 23 | 23 |
validate( |
| 24 | 24 |
@_, {
|
| 25 | 25 |
ticket => { type => HASHREF },
|
| ... | ... | |
| 34 | 34 |
} |
| 35 | 35 |
|
| 36 | 36 |
sub get_ticket {
|
| 37 |
my ($self) = shift;
|
|
| 37 |
my $self = shift;
|
|
| 38 | 38 |
die "Invalid connection state" unless $self->connector->can('GET');
|
| 39 | 39 |
|
| 40 | 40 |
validate( |
| ... | ... | |
| 50 | 50 |
} |
| 51 | 51 |
|
| 52 | 52 |
sub create_ticket {
|
| 53 |
my ($self) = shift;
|
|
| 53 |
my $self = shift;
|
|
| 54 | 54 |
die "Invalid connection state" unless $self->connector->can('POST');
|
| 55 | 55 |
|
| 56 | 56 |
validate( |
| ... | ... | |
| 71 | 71 |
} |
| 72 | 72 |
|
| 73 | 73 |
sub create_article {
|
| 74 |
my ($self) = shift;
|
|
| 74 |
my $self = shift;
|
|
| 75 | 75 |
die "Invalid connection state" unless $self->connector->can('POST');
|
| 76 | 76 |
|
| 77 | 77 |
validate( |
Auch abrufbar als: Unified diff
kix18 parameter strukturell richtig übernehmen. Ein dank an den Testfall