Changeset 267


Ignore:
Timestamp:
01/02/11 02:55:28 (13 years ago)
Author:
nanardon
Message:
  • readd sourcerpm command to bot
File:
1 edited

Legend:

Unmodified
Added
Removed
  • server/trunk/web/lib/Sophie/Controller/Chat/Cmd.pm

    r266 r267  
    463463} 
    464464 
     465=head2 sourcerpm NAME 
     466 
     467Show the C<sourcerpm> tag of package C<NAME>. 
     468 
     469=cut 
     470 
     471sub sourcerpm : XMLRPC { 
     472    my ($self, $c, $reqspec, @args) = @_; 
     473 
     474    $c->forward('qf', [ $reqspec, @args, '%{sourcerpm}' ]); 
     475} 
     476 
     477=head2 src NAME 
     478 
     479Is an alias for C<sourcerpm> command. 
     480 
     481=cut 
     482 
     483sub src : XMLRPC { 
     484    my ($self, $c, $reqspec, @args) = @_; 
     485 
     486    $c->forward('sourcerpm', [ $reqspec, @args ]); 
     487} 
     488 
    465489=head2 qf rpmname format 
    466490 
Note: See TracChangeset for help on using the changeset viewer.