Revision 54ba4f0e
Von Jan Büren vor 12 Monaten hinzugefügt
| SL/KIX18Client.pm | ||
|---|---|---|
|
|
||
|
|
||
|
sub create_ticket_with_article {
|
||
|
my ($self) = shift;
|
||
|
my $self = shift;
|
||
|
validate(
|
||
|
@_, {
|
||
|
ticket => { type => HASHREF },
|
||
| ... | ... | |
|
}
|
||
|
|
||
|
sub get_ticket {
|
||
|
my ($self) = shift;
|
||
|
my $self = shift;
|
||
|
die "Invalid connection state" unless $self->connector->can('GET');
|
||
|
|
||
|
validate(
|
||
| ... | ... | |
|
}
|
||
|
|
||
|
sub create_ticket {
|
||
|
my ($self) = shift;
|
||
|
my $self = shift;
|
||
|
die "Invalid connection state" unless $self->connector->can('POST');
|
||
|
|
||
|
validate(
|
||
| ... | ... | |
|
}
|
||
|
|
||
|
sub create_article {
|
||
|
my ($self) = shift;
|
||
|
my $self = shift;
|
||
|
die "Invalid connection state" unless $self->connector->can('POST');
|
||
|
|
||
|
validate(
|
||
Auch abrufbar als: Unified diff
kix18 parameter strukturell richtig übernehmen. Ein dank an den Testfall