diff options
Diffstat (limited to 'xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm')
| -rw-r--r-- | xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm b/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm index 7ade82a..252b91e 100644 --- a/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm +++ b/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm @@ -168,7 +168,7 @@ sub gen_channel($$) { die "missing context for chan #$num type $type" unless $context; $callerid = ($type eq 'FXO') ? 'asreceived' - : sprintf "\"Channel %d\" <%04d>", $num, $exten; + : sprintf "\"Channel %d\" <%d>", $num, $exten; if($type eq 'IN') { $immediate = 'yes'; } @@ -182,7 +182,7 @@ sub gen_channel($$) { printf ";;; line=\"%d %s%s%s\"\n", $num, $chan->fqn, $signalling, $info; printf "signalling=$sig\n"; printf "callerid=$callerid\n"; - printf "mailbox=%04d\n", $exten unless $type eq 'FXO'; + printf "mailbox=%d\n", $exten unless $type eq 'FXO'; if(defined $group) { printf "group=$group\n"; } |