Changeset 156

Timestamp:

12/21/10 03:29:08 (13 years ago)

Author:

nanardon

Message:

• paste results on the website only if client is authenticated (ie the bot)

File:

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

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

@@ -84 +84 @@
     my ($self, $c, $title, $text) = @_;
 
-    my @char = ('a' .. 'z', 'A' .. 'Z', 0 .. 9);
-    my $id = join('', map { $char[rand(@char)] } (0..7));
-    $c->model('Base::ChatPaste')->create(
-        {
-            id => $id,
-            user_id => $c->model('Base::Users')->find(
-                { mail => $c->user->mail })->ukey,
-            title => $title,
-            reply => $text,
-        }
-    );
-    $c->model('Base')->storage->dbh->commit;
-    $c->stash->{xmlrpc} = $id;
+    if ($c->user_exists) {
+        my @char = ('a' .. 'z', 'A' .. 'Z', 0 .. 9);
+        my $id = join('', map { $char[rand(@char)] } (0..7));
+        $c->model('Base::ChatPaste')->create(
+            {
+                id => $id,
+                user_id => $c->model('Base::Users')->find(
+                    { mail => $c->user->mail })->ukey,
+                title => $title,
+                reply => $text,
+            }
+        );
+        $c->model('Base')->storage->dbh->commit;
+        return $c->stash->{xmlrpc} = $id;
+    } else {
+        return $c->stash->{xmlrpc} = undef;
+    }
 }