X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FRecord.pm;fp=FS%2FFS%2FRecord.pm;h=71eddc1eb6314f9e4fadd03848c87c72c8a0a17e;hp=fd035249be39bf9c351067093a28a9030156aafd;hb=fe4515eb37d76849dd08c62782d86bc7ba311dcd;hpb=81ae0992cf8506c6a77485548ebde25eb946a9a9 diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index fd035249b..71eddc1eb 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -3038,13 +3038,8 @@ Checks to see if the string is encrypted and returns true or false (1/0) to indi sub is_encrypted { my ($self, $value) = @_; - # Possible Bug - Some work may be required here.... - - if ($value =~ /^M/ && length($value) > 80) { - return 1; - } else { - return 0; - } + # could be more precise about it, but this will do for now + $value =~ /^M/ && length($value) > 80; } =item decrypt($value)