Revision 1955
Added by Matt Jones over 19 years ago
Metacat.pm | ||
---|---|---|
96 | 96 |
my $self = shift; |
97 | 97 |
my %postData = ( @_ ); |
98 | 98 |
|
99 |
$self->{'message'} = ''; |
|
99 | 100 |
my $userAgent = new LWP::UserAgent; |
100 | 101 |
$userAgent->agent("MetacatClient/1.0"); |
101 | 102 |
|
Also available in: Unified diff
Updates that allow registry script to update the lastid field more efficiently
by calling the metacat 'getlastdocid' function for a given scope. Also some
debugging support added, and a bug where the error message was inproperly
saved across calls to metacat, resulting in spurious error messages.