add path_info support for supplying one or more IDs

git-svn-id: svn://svn.open-ils.org/ILS/trunk@7609 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm b/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm
index b114c8d..a7e612a 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm
+++ b/Open-ILS/src/perlmods/OpenILS/WWW/Exporter.pm
@@ -53,6 +53,11 @@ sub handler {
        my $cgi = new CGI;
        
        my @records = $cgi->param('id');
+       my $path_rec = $cgi->path_info();
+
+       if (!@records && $path_rec) {
+               @records = map { $_ ? ($_) : () } split '/', $path_rec;
+       }
 
        return 200 unless (@records);