diff options
| author | ivan <ivan> | 2002-04-17 11:41:30 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-04-17 11:41:30 +0000 |
| commit | 62afa0957fd72ec52e9a8defbdbcc796bd04fb82 (patch) | |
| tree | aa78cbb70a225dbb13b3b24f079fed773af81b8d | |
| parent | dd44a58b2e1eab60d856d7092748fde56f2d6dcc (diff) | |
get rid of debugging cruft
| -rw-r--r-- | FS/FS/Record.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index cb42b266c..20da07e53 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -825,9 +825,9 @@ false. sub ut_text { my($self,$field)=@_; - warn "msgcat ". \&msgcat. "\n"; - warn "notexist ". \¬exist. "\n"; - warn "AUTOLOAD ". \&AUTOLOAD. "\n"; + #warn "msgcat ". \&msgcat. "\n"; + #warn "notexist ". \¬exist. "\n"; + #warn "AUTOLOAD ". \&AUTOLOAD. "\n"; $self->getfield($field) =~ /^([\w \!\@\#\$\%\&\(\)\-\+\;\:\'\"\,\.\?\/]+)$/ or return gettext('illegal_or_empty_text'). " $field: ". $self->getfield($field); |