Permalink
Browse files

Change final random calls.

  • Loading branch information...
1 parent 9cc8a80 commit cb03f15cc5b007056109a732271cedc1b8371834 matthew committed Dec 3, 2008
Showing with 3 additions and 3 deletions.
  1. +3 −3 perllib/PB/SMS.pm
View
@@ -10,7 +10,7 @@
# Copyright (c) 2005 UK Citizens Online Democracy. All rights reserved.
# Email: chris@mysociety.org; WWW: http://www.mysociety.org/
#
-# $Id: SMS.pm,v 1.33 2007-08-02 11:45:07 matthew Exp $
+# $Id: SMS.pm,v 1.34 2008-12-03 13:23:44 matthew Exp $
#
package PB::SMS;
@@ -337,9 +337,9 @@ sub receive_sms ($$$$$$) {
and (select mobile from person where person.id = signers.person_id) = ?', {}, $pledge_id, $sender);
# 3. No previous token; generate a new one.
- $token ||= unpack('h*', mySociety::Random::random_bytes(2))
+ $token ||= unpack('h*', mySociety::Random::random_bytes(2, 1))
. "-"
- . unpack('h*', mySociety::Random::random_bytes(2));
+ . unpack('h*', mySociety::Random::random_bytes(2, 1));
# Tell the user how many people have signed. This isn't
# reliable but is Good Enough for these purposes.

0 comments on commit cb03f15

Please sign in to comment.