Revision 9729
Added by ben leinfelder over 8 years ago
| src/perl/Metacat/Metacat.pm | ||
|---|---|---|
| 377 | 377 |
my $self = shift; |
| 378 | 378 |
my $docid = shift; |
| 379 | 379 |
|
| 380 |
my %postData = ( action => 'getaccess', |
|
| 380 |
my %postData = ( action => 'getaccesscontrol',
|
|
| 381 | 381 |
docid => $docid |
| 382 | 382 |
); |
| 383 | 383 |
|
Also available in: Unified diff
use correct Metacat API action for retrieving access control block