Hi,

I'm writing a Perl module to access Trac via XML::RPC. Works good so
far, can create tickets,

# make the XML::RPC connection to the Trac and return a Ticket-object
my $xmlrpc = XML::RPC->new('https://user:[EMAIL PROTECTED]/trac/proj/
xmlrpc');
my $result = $xmlrpc->call('ticket.create', "some summary", "some
description");

even attachments

my $result = $xmlrpc->call('ticket.putAttachment',
                           $ticketid,
                           'Filename',
                           'Some Description',
                           sub { +{base64 => encode_base64('data, data
- it is always the data')} },
                          );

But there is a problem with the attributes struct. I tried to create a
ticket with attributes like this:

 my $result = $ticket->create
        ('ticket.create', "some summary",
         "some description",
         sub { {struct => {owner => 'CPO_Servant',
                                 estimatedhours => '5',
}}},
     );

--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups "Trac 
Development" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/trac-dev?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to