Changeset 245 for server/trunk/web/lib/Sophie/Controller/Chat

Timestamp:

12/30/10 20:05:46 (13 years ago)

Author:

nanardon

Message:

• delete old paste (when new one is request)
• paste title is the command line

File:

• server/trunk/web/lib/Sophie/Controller/Chat/Cmd.pm (modified) (1 diff)

server/trunk/web/lib/Sophie/Controller/Chat/Cmd.pm

@@ -47 +47 @@
 
     if ($needpaste && !$reqspec->{nopaste}) {
-        my $id = $c->forward('/chat/paste', [ 'Bot paste', join("\n", @backup) ]);
+        my $cmd = ($c->action =~ /([^\/]+)$/)[0];
+        my (undef, undef, @args) = @{ $c->req->arguments };
+        my $title = join(' ', $cmd, @args); 
+        my $id = $c->forward('/chat/paste', [ $title, join("\n", @backup) ]);
         if ($id) {
             push(@{ $message->{message} }, 'All results available here: ' . $c->uri_for('/chat', $id));