Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

small change due to tmobile page layout. Omitting messages now.

  • Loading branch information...
commit f7010bd17b181f7e6a08e904b863c420764eb9db 1 parent 2bfca20
@ajithhub authored
Showing with 2 additions and 3 deletions.
  1. +2 −3 poll_balance.pl
  2. BIN  usage.db
View
5 poll_balance.pl
@@ -44,7 +44,6 @@
or die "Couldn't execute statement: ";
my $user_id;
-$DB::single=2;
unless (($user_id) = $user_query_sth->fetchrow_array()) {
$ins_user_sth->execute(
@@ -68,10 +67,10 @@
my $exp_time = Date::Parse::str2time($prepay_info->{expiration});
-for my $key (qw(minutes, messages, balance)) {
+for my $key (qw(minutes balance)) {
exists $prepay_info->{$key} and
defined $prepay_info->{$key}
- or die "Missing data, can't update db: %s", $key;
+ or die sprintf("Missing data, can't update db: %s", $key);
}
$ins_usage_sth->execute(
View
BIN  usage.db
Binary file not shown
Please sign in to comment.
Something went wrong with that request. Please try again.