projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
6680665
)
add a switch to allow letters in phone numbers, RT#4195
author
ivan
<ivan>
Sat, 25 Oct 2008 00:37:02 +0000
(
00:37
+0000)
committer
ivan
<ivan>
Sat, 25 Oct 2008 00:37:02 +0000
(
00:37
+0000)
FS/FS/Conf.pm
patch
|
blob
|
history
FS/FS/svc_phone.pm
patch
|
blob
|
history
diff --git
a/FS/FS/Conf.pm
b/FS/FS/Conf.pm
index
882140f
..
40ef14c
100644
(file)
--- a/
FS/FS/Conf.pm
+++ b/
FS/FS/Conf.pm
@@
-2498,6
+2498,13
@@
worry that config_items is freeside-specific and icky.
'type' => 'text',
},
'type' => 'text',
},
+ {
+ 'key' => 'svc_phone-allow_alpha_phonenum',
+ 'section' => '',
+ 'description' => 'Allow letters in phone numbers.',
+ 'type' => 'checkbox',
+ },
+
);
1;
);
1;
diff --git
a/FS/FS/svc_phone.pm
b/FS/FS/svc_phone.pm
index
c90339a
..
c356344
100644
(file)
--- a/
FS/FS/svc_phone.pm
+++ b/
FS/FS/svc_phone.pm
@@
-179,8
+179,14
@@
and replace methods.
sub check {
my $self = shift;
sub check {
my $self = shift;
+ my $conf = new FS::Conf;
+
my $phonenum = $self->phonenum;
my $phonenum = $self->phonenum;
- $phonenum =~ s/\D//g;
+ if ( $conf->exists('svc_phone-allow_alpha_phonenum') ) {
+ $phonenum =~ s/\W//g;
+ } else {
+ $phonenum =~ s/\D//g;
+ }
$self->phonenum($phonenum);
my $error =
$self->phonenum($phonenum);
my $error =