diff options
| author | Mark Spencer <markster@digium.com> | 2004-05-16 17:52:24 +0000 |
|---|---|---|
| committer | Mark Spencer <markster@digium.com> | 2004-05-16 17:52:24 +0000 |
| commit | 1feaac6a54c49d2767fedaf1ba5d383d38fc75f3 (patch) | |
| tree | bffb1030e93b4a1909b3653a25aa92c63ec82e01 /contrib/scripts/vmail.cgi | |
| parent | 4fc75f6559287dbe440dde2d593f88fb7aa206f7 (diff) | |
Allow defining a default context (bug #1658)
git-svn-id: https://origsvn.digium.com/svn/asterisk/trunk@2984 65c4cc65-6c06-0410-ace0-fbb531ad65f3
Diffstat (limited to 'contrib/scripts/vmail.cgi')
| -rwxr-xr-x | contrib/scripts/vmail.cgi | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/contrib/scripts/vmail.cgi b/contrib/scripts/vmail.cgi index 146de60e0..887f604a2 100755 --- a/contrib/scripts/vmail.cgi +++ b/contrib/scripts/vmail.cgi @@ -15,6 +15,8 @@ use CGI qw/:standard/; use Carp::Heavy; use CGI::Carp qw(fatalsToBrowser); +$context=""; # Define here your by default context (so you dont need to put voicemail@context in the login + @validfolders = ( "INBOX", "Old", "Work", "Family", "Friends", "Cust1", "Cust2", "Cust3", "Cust4", "Cust5" ); %formats = ( @@ -38,7 +40,7 @@ use CGI::Carp qw(fatalsToBrowser); $astpath = "/_asterisk"; $stdcontainerstart = "<table align=center width=600><tr><td>\n"; -$footer = "<hr><font size=-1><a href=\"http://www.asterisk.org\">The Asterisk Open Source PBX</a> Copyright 2002, <a href=\"http://www.digium.com\">Digium, Inc.</a></a>"; +$footer = "<hr><font size=-1><a href=\"http://www.asterisk.org\">The Asterisk Open Source PBX</a> Copyright 2004, <a href=\"http://www.digium.com\">Digium, Inc.</a></a>"; $stdcontainerend = "</td></tr><tr><td align=right>$footer</td></tr></table>\n"; sub login_screen() { @@ -58,6 +60,7 @@ $stdcontainerstart <tr><td>Mailbox:</td><td><input type=text name="mailbox"></td></tr> <tr><td>Password:</td><td><input type=password name="password"></td></tr> <tr><td align=right colspan=2><input value="Login" type=submit></td></tr> +<input type=hidden name="context" value="$context"> </table> </FORM> $stdcontainerend |