Don't resend sms when out of credits

[ndwebbie.git] / scripts / sms.pl

diff --git a/scripts/sms.pl b/scripts/sms.pl
index dd60bda5852cbd58122c6d12ab17f452ce267bd1..d4f55ebe0976952e8f4ca349ca7035a32ed823af 100755 (executable)
--- a/scripts/sms.pl
+++ b/scripts/sms.pl
@@ -67,7 +67,7 @@ eval{
                        when(/^ID: (\S+)/){
                                $update->execute($msg->{id},$1,'Sent');
                        }
-                       when(/^ERR: (?:302|128|114|113|105),(.*)/){
+                       when(/^ERR: (?:301|302|128|114|113|105),(.*)/){
                                $update->execute($msg->{id},undef,$1);
                        }
                        default {