democracy now: import into second cart of show log

1 files changed, 14 insertions, 0 deletions

diff --git a/rhautoimport.pm b/rhautoimport.pm
index 4e893ae..9ac48f0 100644
--- a/rhautoimport.pm
+++ b/rhautoimport.pm
@@ -70,6 +70,20 @@ sub get_dropboxes
   return @allowed_dbs;
 }
 
+sub get_show_carts
+{
+  my ($show_id) = @_;
+
+  my ($ctx, $status, $errorstring) = RHRD::rddb::init();
+  if(!defined $ctx) {
+    return ($ctx, $errorstring);
+  }
+  my @show_carts = RHRD::rddb::get_show_carts($ctx, $show_id);
+  RHRD::rddb::destroy($ctx);
+
+  return @show_carts;
+}
+
 sub fetch_parse_rss
 {
   my ($url, $ua_str, $headers, $queries) = @_;