diff --git a/lib/Univie/Utheses/API.pm b/lib/Univie/Utheses/API.pm index 11f01a1211c0ff73d33c801d03630d206606d8b8..a6d3876e11bdcaecc5d4e592a7622934cf627384 100644 --- a/lib/Univie/Utheses/API.pm +++ b/lib/Univie/Utheses/API.pm @@ -32,7 +32,7 @@ sub getPendingDoisCreateRequest my $self= shift; my ($code1, $res1, $info)= $self->utheses_request('GET', 'doi/get/createRequest', undef, ); - print __LINE__, " code1=[$code1] res1=[$res1] info=[$info]\n"; + # print __LINE__, " code1=[$code1] res1=[$res1] info=[$info]\n"; # TODO: Error handling! (wantarray) ? ($code1, $res1, $info) : $info;