diff options
| author | root <root@hello.jones.dk> | 2010-06-05 18:55:36 +0200 |
|---|---|---|
| committer | root <root@hello.jones.dk> | 2010-06-05 18:55:36 +0200 |
| commit | b60961d6f2805769f36abf1588646c501fe81309 (patch) | |
| tree | c44c788a423cb4488bb541466ec3cca4a528a15e /localmarkdown2sms | |
| parent | f2962c6ceebee1c1684fb53f81bd8f645c449b88 (diff) | |
| parent | 847a13089cd112ab6d047d1d1614e6a9c6f2dd9c (diff) | |
Merge branch 'master' of git://source.jones.dk/sbin
Conflicts:
localkannel-dispatch
Diffstat (limited to 'localmarkdown2sms')
| -rwxr-xr-x | localmarkdown2sms | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/localmarkdown2sms b/localmarkdown2sms index 2f91108..47a06f3 100755 --- a/localmarkdown2sms +++ b/localmarkdown2sms @@ -47,6 +47,8 @@ my $sms_msgtag = $ENV{SMS_MSGTAG} || "text"; my $sms_cp = $ENV{SMS_CP} || "utf8"; my $sms_concat = $ENV{SMS_CONCAT}; my $sms_dlr_mask = $ENV{SMS_DLR_MASK}; +my $sms_dlr_url = $ENV{SMS_DLR_URL}; +my $sms_validity = $ENV{SMS_VALIDITY}; my $path = $ENV{mdpath}; my (%file, %delay, %reply); @@ -206,6 +208,8 @@ sub sendmsg { $url .= '&smsc=' . uri_escape($sms_smsc) if ($sms_smsc); $url .= '&concat=' . uri_escape($sms_concat) if ($sms_concat); $url .= '&dlr-mask=' . uri_escape($sms_dlr_mask) if ($sms_dlr_mask); + $url .= '&dlr-url=' . uri_escape($sms_dlr_url) if ($sms_dlr_url); + $url .= '&validity=' . uri_escape($sms_validity) if ($sms_validity); $url .= '&' . $sms_msgtag . '=' . uri_escape(transliterate($sms_cp, $msg)); DEBUG "Sending request: $url"; my $response = $ua->request(HTTP::Request->new('GET', $url)); |